home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 July: Mac OS SDK / Dev.CD Jul 97 SDK2.toast / Development Kits (Disc 2) / QuickTime / QuickTime™ 2.5 / Interfaces for Programmers / AIncludes / QuickTimeComponents.a < prev    next >
Encoding:
Text File  |  1997-02-26  |  141.8 KB  |  6,245 lines  |  [TEXT/MPS ]

  1. ;
  2. ;    File:        QuickTimeComponents.a
  3. ;
  4. ;    Contains:    QuickTime interfaces
  5. ;
  6. ;    Version:    Technology:    
  7. ;                Release:    QuickTime 2.5 interfaces to use with ETO #20
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__QUICKTIMECOMPONENTS__') = 'UNDEFINED' THEN
  19. __QUICKTIMECOMPONENTS__ SET 1
  20.  
  21.     IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
  22.     include 'Components.a'
  23.     ENDIF
  24.     IF &TYPE('__IMAGECOMPRESSION__') = 'UNDEFINED' THEN
  25.     include 'ImageCompression.a'
  26.     ENDIF
  27.     IF &TYPE('__MOVIES__') = 'UNDEFINED' THEN
  28.     include 'Movies.a'
  29.     ENDIF
  30.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  31.     include 'Quickdraw.a'
  32.     ENDIF
  33.     IF &TYPE('__VIDEO__') = 'UNDEFINED' THEN
  34.     include 'Video.a'
  35.     ENDIF
  36.     IF &TYPE('__MEMORY__') = 'UNDEFINED' THEN
  37.     include 'Memory.a'
  38.     ENDIF
  39.     IF &TYPE('__SOUND__') = 'UNDEFINED' THEN
  40.     include 'Sound.a'
  41.     ENDIF
  42.     IF &TYPE('__QUICKTIMEMUSIC__') = 'UNDEFINED' THEN
  43.     include 'QuickTimeMusic.a'
  44.     ENDIF
  45.  
  46. clockComponentType                EQU        'clok'
  47. systemTickClock                    EQU        'tick'                ; subtype: 60ths since boot        
  48. systemSecondClock                EQU        'seco'                ; subtype: seconds since 1904        
  49. systemMillisecondClock            EQU        'mill'                ; subtype: 1000ths since boot        
  50. systemMicrosecondClock            EQU        'micr'                ; subtype: 1000000ths since boot    
  51.  
  52. kClockRateIsLinear                EQU        1
  53. kClockImplementsCallBacks        EQU        2
  54. ; * These are Clock procedures *
  55. ;
  56. ; pascal ComponentResult ClockGetTime(ComponentInstance aClock, TimeRecord *out)
  57. ;
  58.     IF ¬ GENERATINGCFM THEN
  59.         Macro
  60.         _ClockGetTime
  61.             dc.w                $2F3C
  62.             dc.w                $0004
  63.             dc.w                $0001
  64.             moveq               #0,d0
  65.             dc.w                $A82A
  66.         EndM
  67.     ELSE
  68.         IMPORT_CFM_FUNCTION ClockGetTime
  69.     ENDIF
  70.  
  71. ;
  72. ; pascal QTCallBack ClockNewCallBack(ComponentInstance aClock, TimeBase tb, short callBackType)
  73. ;
  74.     IF ¬ GENERATINGCFM THEN
  75.         Macro
  76.         _ClockNewCallBack
  77.             dc.w                $2F3C
  78.             dc.w                $0006
  79.             dc.w                $0002
  80.             moveq               #0,d0
  81.             dc.w                $A82A
  82.         EndM
  83.     ELSE
  84.         IMPORT_CFM_FUNCTION ClockNewCallBack
  85.     ENDIF
  86.  
  87. ;
  88. ; pascal ComponentResult ClockDisposeCallBack(ComponentInstance aClock, QTCallBack cb)
  89. ;
  90.     IF ¬ GENERATINGCFM THEN
  91.         Macro
  92.         _ClockDisposeCallBack
  93.             dc.w                $2F3C
  94.             dc.w                $0004
  95.             dc.w                $0003
  96.             moveq               #0,d0
  97.             dc.w                $A82A
  98.         EndM
  99.     ELSE
  100.         IMPORT_CFM_FUNCTION ClockDisposeCallBack
  101.     ENDIF
  102.  
  103. ;
  104. ; pascal ComponentResult ClockCallMeWhen(ComponentInstance aClock, QTCallBack cb, long param1, long param2, long param3)
  105. ;
  106.     IF ¬ GENERATINGCFM THEN
  107.         Macro
  108.         _ClockCallMeWhen
  109.             dc.w                $2F3C
  110.             dc.w                $0010
  111.             dc.w                $0004
  112.             moveq               #0,d0
  113.             dc.w                $A82A
  114.         EndM
  115.     ELSE
  116.         IMPORT_CFM_FUNCTION ClockCallMeWhen
  117.     ENDIF
  118.  
  119. ;
  120. ; pascal ComponentResult ClockCancelCallBack(ComponentInstance aClock, QTCallBack cb)
  121. ;
  122.     IF ¬ GENERATINGCFM THEN
  123.         Macro
  124.         _ClockCancelCallBack
  125.             dc.w                $2F3C
  126.             dc.w                $0004
  127.             dc.w                $0005
  128.             moveq               #0,d0
  129.             dc.w                $A82A
  130.         EndM
  131.     ELSE
  132.         IMPORT_CFM_FUNCTION ClockCancelCallBack
  133.     ENDIF
  134.  
  135. ;
  136. ; pascal ComponentResult ClockRateChanged(ComponentInstance aClock, QTCallBack cb)
  137. ;
  138.     IF ¬ GENERATINGCFM THEN
  139.         Macro
  140.         _ClockRateChanged
  141.             dc.w                $2F3C
  142.             dc.w                $0004
  143.             dc.w                $0006
  144.             moveq               #0,d0
  145.             dc.w                $A82A
  146.         EndM
  147.     ELSE
  148.         IMPORT_CFM_FUNCTION ClockRateChanged
  149.     ENDIF
  150.  
  151. ;
  152. ; pascal ComponentResult ClockTimeChanged(ComponentInstance aClock, QTCallBack cb)
  153. ;
  154.     IF ¬ GENERATINGCFM THEN
  155.         Macro
  156.         _ClockTimeChanged
  157.             dc.w                $2F3C
  158.             dc.w                $0004
  159.             dc.w                $0007
  160.             moveq               #0,d0
  161.             dc.w                $A82A
  162.         EndM
  163.     ELSE
  164.         IMPORT_CFM_FUNCTION ClockTimeChanged
  165.     ENDIF
  166.  
  167. ;
  168. ; pascal ComponentResult ClockSetTimeBase(ComponentInstance aClock, TimeBase tb)
  169. ;
  170.     IF ¬ GENERATINGCFM THEN
  171.         Macro
  172.         _ClockSetTimeBase
  173.             dc.w                $2F3C
  174.             dc.w                $0004
  175.             dc.w                $0008
  176.             moveq               #0,d0
  177.             dc.w                $A82A
  178.         EndM
  179.     ELSE
  180.         IMPORT_CFM_FUNCTION ClockSetTimeBase
  181.     ENDIF
  182.  
  183. ;
  184. ; pascal ComponentResult ClockStartStopChanged(ComponentInstance aClock, QTCallBack cb, Boolean startChanged, Boolean stopChanged)
  185. ;
  186.     IF ¬ GENERATINGCFM THEN
  187.         Macro
  188.         _ClockStartStopChanged
  189.             dc.w                $2F3C
  190.             dc.w                $0008
  191.             dc.w                $0009
  192.             moveq               #0,d0
  193.             dc.w                $A82A
  194.         EndM
  195.     ELSE
  196.         IMPORT_CFM_FUNCTION ClockStartStopChanged
  197.     ENDIF
  198.  
  199. ;
  200. ; pascal ComponentResult ClockGetRate(ComponentInstance aClock, Fixed *rate)
  201. ;
  202.     IF ¬ GENERATINGCFM THEN
  203.         Macro
  204.         _ClockGetRate
  205.             dc.w                $2F3C
  206.             dc.w                $0004
  207.             dc.w                $000A
  208.             moveq               #0,d0
  209.             dc.w                $A82A
  210.         EndM
  211.     ELSE
  212.         IMPORT_CFM_FUNCTION ClockGetRate
  213.     ENDIF
  214.  
  215.  
  216. StandardCompressionType            EQU        'scdi'
  217. StandardCompressionSubType        EQU        'imag'
  218. ;     Preference flags.
  219.  
  220. scListEveryCodec                EQU        $00000002
  221. scAllowZeroFrameRate            EQU        $00000004
  222. scAllowZeroKeyFrameRate            EQU        $00000008
  223. scShowBestDepth                    EQU        $00000010
  224. scUseMovableModal                EQU        $00000020
  225. ;     Possible test flags for setting test image.
  226.  
  227. scPreferCropping                EQU        $01
  228. scPreferScaling                    EQU        $02
  229. scPreferScalingAndCropping        EQU        $03
  230. ;     Dimensions of the image preview box.
  231.  
  232. scTestImageWidth                EQU        80
  233. scTestImageHeight                EQU        80
  234. ;     Possible items returned by hookProc.
  235.  
  236. scOKItem                        EQU        1
  237. scCancelItem                    EQU        2
  238. scCustomItem                    EQU        3
  239. ;     Result returned when user cancelled.
  240.  
  241. scUserCancelled                    EQU        1
  242. ;     Get/SetInfo structures.
  243. SCSpatialSettings        RECORD 0
  244. codecType                 ds.l    1                ; offset: $0 (0)
  245. codec                     ds.l    1                ; offset: $4 (4)
  246. depth                     ds.w    1                ; offset: $8 (8)
  247. spatialQuality             ds.l    1                ; offset: $A (10)
  248. sizeof                     EQU *                    ; size:   $E (14)
  249.                         ENDR
  250. SCTemporalSettings        RECORD 0
  251. temporalQuality             ds.l    1                ; offset: $0 (0)
  252. frameRate                 ds.l    1                ; offset: $4 (4)
  253. keyFrameRate             ds.l    1                ; offset: $8 (8)
  254. sizeof                     EQU *                    ; size:   $C (12)
  255.                         ENDR
  256. SCDataRateSettings        RECORD 0
  257. dataRate                 ds.l    1                ; offset: $0 (0)
  258. frameDuration             ds.l    1                ; offset: $4 (4)
  259. minSpatialQuality         ds.l    1                ; offset: $8 (8)
  260. minTemporalQuality         ds.l    1                ; offset: $C (12)
  261. sizeof                     EQU *                    ; size:   $10 (16)
  262.                         ENDR
  263. SCExtendedProcs            RECORD 0
  264. filterProc                 ds.l    1                ; offset: $0 (0)
  265. hookProc                 ds.l    1                ; offset: $4 (4)
  266. refcon                     ds.l    1                ; offset: $8 (8)
  267. customName                 ds        Str31            ; offset: $C (12)
  268. sizeof                     EQU *                    ; size:   $2C (44)
  269.                         ENDR
  270. ;     Get/SetInfo selectors
  271.  
  272. scSpatialSettingsType            EQU        'sptl'                ; pointer to SCSpatialSettings struct
  273. scTemporalSettingsType            EQU        'tprl'                ; pointer to SCTemporalSettings struct
  274. scDataRateSettingsType            EQU        'drat'                ; pointer to SCDataRateSettings struct
  275. scColorTableType                EQU        'clut'                ; pointer to CTabHandle
  276. scProgressProcType                EQU        'prog'                ; pointer to ProgressRecord struct
  277. scExtendedProcsType                EQU        'xprc'                ; pointer to SCExtendedProcs struct
  278. scPreferenceFlagsType            EQU        'pref'                ; pointer to long
  279. scSettingsStateType                EQU        'ssta'                ; pointer to Handle
  280. scSequenceIDType                EQU        'sequ'                ; pointer to ImageSequence
  281. scWindowPositionType            EQU        'wndw'                ; pointer to Point
  282. scCodecFlagsType                EQU        'cflg'                ; pointer to CodecFlags
  283. scCodecSettingsType                EQU        'cdec'                ; pointer to Handle
  284. scForceKeyValueType                EQU        'ksim'                ; pointer to long
  285. ;     scTypeNotFoundErr returned by Get/SetInfo when type cannot be found.
  286. SCParams                RECORD 0
  287. flags                     ds.l    1                ; offset: $0 (0)
  288. theCodecType             ds.l    1                ; offset: $4 (4)
  289. theCodec                 ds.l    1                ; offset: $8 (8)
  290. spatialQuality             ds.l    1                ; offset: $C (12)
  291. temporalQuality             ds.l    1                ; offset: $10 (16)
  292. depth                     ds.w    1                ; offset: $14 (20)
  293. frameRate                 ds.l    1                ; offset: $16 (22)
  294. keyFrameRate             ds.l    1                ; offset: $1A (26)
  295. reserved1                 ds.l    1                ; offset: $1E (30)
  296. reserved2                 ds.l    1                ; offset: $22 (34)
  297. sizeof                     EQU *                    ; size:   $26 (38)
  298.                         ENDR
  299.  
  300. scGetCompression                EQU        1
  301. scShowMotionSettings            EQU        $00000001
  302. scSettingsChangedItem            EQU        -1
  303.  
  304. scCompressFlagIgnoreIdenticalFrames EQU    1
  305. ; * These are Progress procedures *
  306. ;
  307. ; pascal ComponentResult SCGetCompressionExtended(ComponentInstance ci, SCParams *params, Point where, SCModalFilterUPP filterProc, SCModalHookUPP hookProc, long refcon, StringPtr customName)
  308. ;
  309.     IF ¬ GENERATINGCFM THEN
  310.         Macro
  311.         _SCGetCompressionExtended
  312.             dc.w                $2F3C
  313.             dc.w                $0018
  314.             dc.w                $0001
  315.             moveq               #0,d0
  316.             dc.w                $A82A
  317.         EndM
  318.     ELSE
  319.         IMPORT_CFM_FUNCTION SCGetCompressionExtended
  320.     ENDIF
  321.  
  322. ;
  323. ; pascal ComponentResult SCPositionRect(ComponentInstance ci, Rect *rp, Point *where)
  324. ;
  325.     IF ¬ GENERATINGCFM THEN
  326.         Macro
  327.         _SCPositionRect
  328.             dc.w                $2F3C
  329.             dc.w                $0008
  330.             dc.w                $0002
  331.             moveq               #0,d0
  332.             dc.w                $A82A
  333.         EndM
  334.     ELSE
  335.         IMPORT_CFM_FUNCTION SCPositionRect
  336.     ENDIF
  337.  
  338. ;
  339. ; pascal ComponentResult SCPositionDialog(ComponentInstance ci, short id, Point *where)
  340. ;
  341.     IF ¬ GENERATINGCFM THEN
  342.         Macro
  343.         _SCPositionDialog
  344.             dc.w                $2F3C
  345.             dc.w                $0006
  346.             dc.w                $0003
  347.             moveq               #0,d0
  348.             dc.w                $A82A
  349.         EndM
  350.     ELSE
  351.         IMPORT_CFM_FUNCTION SCPositionDialog
  352.     ENDIF
  353.  
  354. ;
  355. ; pascal ComponentResult SCSetTestImagePictHandle(ComponentInstance ci, PicHandle testPict, Rect *testRect, short testFlags)
  356. ;
  357.     IF ¬ GENERATINGCFM THEN
  358.         Macro
  359.         _SCSetTestImagePictHandle
  360.             dc.w                $2F3C
  361.             dc.w                $000A
  362.             dc.w                $0004
  363.             moveq               #0,d0
  364.             dc.w                $A82A
  365.         EndM
  366.     ELSE
  367.         IMPORT_CFM_FUNCTION SCSetTestImagePictHandle
  368.     ENDIF
  369.  
  370. ;
  371. ; pascal ComponentResult SCSetTestImagePictFile(ComponentInstance ci, short testFileRef, Rect *testRect, short testFlags)
  372. ;
  373.     IF ¬ GENERATINGCFM THEN
  374.         Macro
  375.         _SCSetTestImagePictFile
  376.             dc.w                $2F3C
  377.             dc.w                $0008
  378.             dc.w                $0005
  379.             moveq               #0,d0
  380.             dc.w                $A82A
  381.         EndM
  382.     ELSE
  383.         IMPORT_CFM_FUNCTION SCSetTestImagePictFile
  384.     ENDIF
  385.  
  386. ;
  387. ; pascal ComponentResult SCSetTestImagePixMap(ComponentInstance ci, PixMapHandle testPixMap, Rect *testRect, short testFlags)
  388. ;
  389.     IF ¬ GENERATINGCFM THEN
  390.         Macro
  391.         _SCSetTestImagePixMap
  392.             dc.w                $2F3C
  393.             dc.w                $000A
  394.             dc.w                $0006
  395.             moveq               #0,d0
  396.             dc.w                $A82A
  397.         EndM
  398.     ELSE
  399.         IMPORT_CFM_FUNCTION SCSetTestImagePixMap
  400.     ENDIF
  401.  
  402. ;
  403. ; pascal ComponentResult SCGetBestDeviceRect(ComponentInstance ci, Rect *r)
  404. ;
  405.     IF ¬ GENERATINGCFM THEN
  406.         Macro
  407.         _SCGetBestDeviceRect
  408.             dc.w                $2F3C
  409.             dc.w                $0004
  410.             dc.w                $0007
  411.             moveq               #0,d0
  412.             dc.w                $A82A
  413.         EndM
  414.     ELSE
  415.         IMPORT_CFM_FUNCTION SCGetBestDeviceRect
  416.     ENDIF
  417.  
  418. ;
  419. ; pascal ComponentResult SCRequestImageSettings(ComponentInstance ci)
  420. ;
  421.     IF ¬ GENERATINGCFM THEN
  422.         Macro
  423.         _SCRequestImageSettings
  424.             dc.w                $2F3C
  425.             dc.w                $0000
  426.             dc.w                $000A
  427.             moveq               #0,d0
  428.             dc.w                $A82A
  429.         EndM
  430.     ELSE
  431.         IMPORT_CFM_FUNCTION SCRequestImageSettings
  432.     ENDIF
  433.  
  434. ;
  435. ; pascal ComponentResult SCCompressImage(ComponentInstance ci, PixMapHandle src, const Rect *srcRect, ImageDescriptionHandle *desc, Handle *data)
  436. ;
  437.     IF ¬ GENERATINGCFM THEN
  438.         Macro
  439.         _SCCompressImage
  440.             dc.w                $2F3C
  441.             dc.w                $0010
  442.             dc.w                $000B
  443.             moveq               #0,d0
  444.             dc.w                $A82A
  445.         EndM
  446.     ELSE
  447.         IMPORT_CFM_FUNCTION SCCompressImage
  448.     ENDIF
  449.  
  450. ;
  451. ; pascal ComponentResult SCCompressPicture(ComponentInstance ci, PicHandle srcPicture, PicHandle dstPicture)
  452. ;
  453.     IF ¬ GENERATINGCFM THEN
  454.         Macro
  455.         _SCCompressPicture
  456.             dc.w                $2F3C
  457.             dc.w                $0008
  458.             dc.w                $000C
  459.             moveq               #0,d0
  460.             dc.w                $A82A
  461.         EndM
  462.     ELSE
  463.         IMPORT_CFM_FUNCTION SCCompressPicture
  464.     ENDIF
  465.  
  466. ;
  467. ; pascal ComponentResult SCCompressPictureFile(ComponentInstance ci, short srcRefNum, short dstRefNum)
  468. ;
  469.     IF ¬ GENERATINGCFM THEN
  470.         Macro
  471.         _SCCompressPictureFile
  472.             dc.w                $2F3C
  473.             dc.w                $0004
  474.             dc.w                $000D
  475.             moveq               #0,d0
  476.             dc.w                $A82A
  477.         EndM
  478.     ELSE
  479.         IMPORT_CFM_FUNCTION SCCompressPictureFile
  480.     ENDIF
  481.  
  482. ;
  483. ; pascal ComponentResult SCRequestSequenceSettings(ComponentInstance ci)
  484. ;
  485.     IF ¬ GENERATINGCFM THEN
  486.         Macro
  487.         _SCRequestSequenceSettings
  488.             dc.w                $2F3C
  489.             dc.w                $0000
  490.             dc.w                $000E
  491.             moveq               #0,d0
  492.             dc.w                $A82A
  493.         EndM
  494.     ELSE
  495.         IMPORT_CFM_FUNCTION SCRequestSequenceSettings
  496.     ENDIF
  497.  
  498. ;
  499. ; pascal ComponentResult SCCompressSequenceBegin(ComponentInstance ci, PixMapHandle src, const Rect *srcRect, ImageDescriptionHandle *desc)
  500. ;
  501.     IF ¬ GENERATINGCFM THEN
  502.         Macro
  503.         _SCCompressSequenceBegin
  504.             dc.w                $2F3C
  505.             dc.w                $000C
  506.             dc.w                $000F
  507.             moveq               #0,d0
  508.             dc.w                $A82A
  509.         EndM
  510.     ELSE
  511.         IMPORT_CFM_FUNCTION SCCompressSequenceBegin
  512.     ENDIF
  513.  
  514. ;
  515. ; pascal ComponentResult SCCompressSequenceFrame(ComponentInstance ci, PixMapHandle src, const Rect *srcRect, Handle *data, long *dataSize, short *notSyncFlag)
  516. ;
  517.     IF ¬ GENERATINGCFM THEN
  518.         Macro
  519.         _SCCompressSequenceFrame
  520.             dc.w                $2F3C
  521.             dc.w                $0014
  522.             dc.w                $0010
  523.             moveq               #0,d0
  524.             dc.w                $A82A
  525.         EndM
  526.     ELSE
  527.         IMPORT_CFM_FUNCTION SCCompressSequenceFrame
  528.     ENDIF
  529.  
  530. ;
  531. ; pascal ComponentResult SCCompressSequenceEnd(ComponentInstance ci)
  532. ;
  533.     IF ¬ GENERATINGCFM THEN
  534.         Macro
  535.         _SCCompressSequenceEnd
  536.             dc.w                $2F3C
  537.             dc.w                $0000
  538.             dc.w                $0011
  539.             moveq               #0,d0
  540.             dc.w                $A82A
  541.         EndM
  542.     ELSE
  543.         IMPORT_CFM_FUNCTION SCCompressSequenceEnd
  544.     ENDIF
  545.  
  546. ;
  547. ; pascal ComponentResult SCDefaultPictHandleSettings(ComponentInstance ci, PicHandle srcPicture, short motion)
  548. ;
  549.     IF ¬ GENERATINGCFM THEN
  550.         Macro
  551.         _SCDefaultPictHandleSettings
  552.             dc.w                $2F3C
  553.             dc.w                $0006
  554.             dc.w                $0012
  555.             moveq               #0,d0
  556.             dc.w                $A82A
  557.         EndM
  558.     ELSE
  559.         IMPORT_CFM_FUNCTION SCDefaultPictHandleSettings
  560.     ENDIF
  561.  
  562. ;
  563. ; pascal ComponentResult SCDefaultPictFileSettings(ComponentInstance ci, short srcRef, short motion)
  564. ;
  565.     IF ¬ GENERATINGCFM THEN
  566.         Macro
  567.         _SCDefaultPictFileSettings
  568.             dc.w                $2F3C
  569.             dc.w                $0004
  570.             dc.w                $0013
  571.             moveq               #0,d0
  572.             dc.w                $A82A
  573.         EndM
  574.     ELSE
  575.         IMPORT_CFM_FUNCTION SCDefaultPictFileSettings
  576.     ENDIF
  577.  
  578. ;
  579. ; pascal ComponentResult SCDefaultPixMapSettings(ComponentInstance ci, PixMapHandle src, short motion)
  580. ;
  581.     IF ¬ GENERATINGCFM THEN
  582.         Macro
  583.         _SCDefaultPixMapSettings
  584.             dc.w                $2F3C
  585.             dc.w                $0006
  586.             dc.w                $0014
  587.             moveq               #0,d0
  588.             dc.w                $A82A
  589.         EndM
  590.     ELSE
  591.         IMPORT_CFM_FUNCTION SCDefaultPixMapSettings
  592.     ENDIF
  593.  
  594. ;
  595. ; pascal ComponentResult SCGetInfo(ComponentInstance ci, OSType infoType, void *info)
  596. ;
  597.     IF ¬ GENERATINGCFM THEN
  598.         Macro
  599.         _SCGetInfo
  600.             dc.w                $2F3C
  601.             dc.w                $0008
  602.             dc.w                $0015
  603.             moveq               #0,d0
  604.             dc.w                $A82A
  605.         EndM
  606.     ELSE
  607.         IMPORT_CFM_FUNCTION SCGetInfo
  608.     ENDIF
  609.  
  610. ;
  611. ; pascal ComponentResult SCSetInfo(ComponentInstance ci, OSType infoType, void *info)
  612. ;
  613.     IF ¬ GENERATINGCFM THEN
  614.         Macro
  615.         _SCSetInfo
  616.             dc.w                $2F3C
  617.             dc.w                $0008
  618.             dc.w                $0016
  619.             moveq               #0,d0
  620.             dc.w                $A82A
  621.         EndM
  622.     ELSE
  623.         IMPORT_CFM_FUNCTION SCSetInfo
  624.     ENDIF
  625.  
  626. ;
  627. ; pascal ComponentResult SCNewGWorld(ComponentInstance ci, GWorldPtr *gwp, Rect *rp, GWorldFlags flags)
  628. ;
  629.     IF ¬ GENERATINGCFM THEN
  630.         Macro
  631.         _SCNewGWorld
  632.             dc.w                $2F3C
  633.             dc.w                $000C
  634.             dc.w                $0017
  635.             moveq               #0,d0
  636.             dc.w                $A82A
  637.         EndM
  638.     ELSE
  639.         IMPORT_CFM_FUNCTION SCNewGWorld
  640.     ENDIF
  641.  
  642. ;
  643. ; pascal ComponentResult SCSetCompressFlags(ComponentInstance ci, long flags)
  644. ;
  645.     IF ¬ GENERATINGCFM THEN
  646.         Macro
  647.         _SCSetCompressFlags
  648.             dc.w                $2F3C
  649.             dc.w                $0004
  650.             dc.w                $0018
  651.             moveq               #0,d0
  652.             dc.w                $A82A
  653.         EndM
  654.     ELSE
  655.         IMPORT_CFM_FUNCTION SCSetCompressFlags
  656.     ENDIF
  657.  
  658. ;
  659. ; pascal ComponentResult SCGetCompressFlags(ComponentInstance ci, long *flags)
  660. ;
  661.     IF ¬ GENERATINGCFM THEN
  662.         Macro
  663.         _SCGetCompressFlags
  664.             dc.w                $2F3C
  665.             dc.w                $0004
  666.             dc.w                $0019
  667.             moveq               #0,d0
  668.             dc.w                $A82A
  669.         EndM
  670.     ELSE
  671.         IMPORT_CFM_FUNCTION SCGetCompressFlags
  672.     ENDIF
  673.  
  674.  
  675. TweenComponentType                EQU        'twen'
  676. ; typedef ComponentInstance             TweenerComponent
  677.  
  678.  
  679.  
  680. TweenRecord                RECORD 0
  681. version                     ds.l    1                ; offset: $0 (0)
  682. container                 ds.l    1                ; offset: $4 (4)
  683. tweenAtom                 ds.l    1                ; offset: $8 (8)
  684. dataAtom                 ds.l    1                ; offset: $C (12)
  685. percent                     ds.l    1                ; offset: $10 (16)
  686. dataProc                 ds.l    1                ; offset: $14 (20)
  687. private1                 ds.l    1                ; offset: $18 (24)
  688. private2                 ds.l    1                ; offset: $1C (28)
  689. sizeof                     EQU *                    ; size:   $20 (32)
  690.                         ENDR
  691. ;
  692. ; pascal ComponentResult TweenerInitialize(TweenerComponent tc, QTAtomContainer container, QTAtom tweenAtom, QTAtom dataAtom)
  693. ;
  694.     IF ¬ GENERATINGCFM THEN
  695.         Macro
  696.         _TweenerInitialize
  697.             dc.w                $2F3C
  698.             dc.w                $000C
  699.             dc.w                $0001
  700.             moveq               #0,d0
  701.             dc.w                $A82A
  702.         EndM
  703.     ELSE
  704.         IMPORT_CFM_FUNCTION TweenerInitialize
  705.     ENDIF
  706.  
  707. ;
  708. ; pascal ComponentResult TweenerDoTween(TweenerComponent tc, TweenRecord *tr)
  709. ;
  710.     IF ¬ GENERATINGCFM THEN
  711.         Macro
  712.         _TweenerDoTween
  713.             dc.w                $2F3C
  714.             dc.w                $0004
  715.             dc.w                $0002
  716.             moveq               #0,d0
  717.             dc.w                $A82A
  718.         EndM
  719.     ELSE
  720.         IMPORT_CFM_FUNCTION TweenerDoTween
  721.     ENDIF
  722.  
  723. ;
  724. ; pascal ComponentResult TweenerReset(TweenerComponent tc)
  725. ;
  726.     IF ¬ GENERATINGCFM THEN
  727.         Macro
  728.         _TweenerReset
  729.             dc.w                $2F3C
  730.             dc.w                $0000
  731.             dc.w                $0003
  732.             moveq               #0,d0
  733.             dc.w                $A82A
  734.         EndM
  735.     ELSE
  736.         IMPORT_CFM_FUNCTION TweenerReset
  737.     ENDIF
  738.  
  739.  
  740. TCSourceRefNameType                EQU        'name'
  741.  
  742. tcDropFrame                        EQU        $01
  743. tc24HourMax                        EQU        $02
  744. tcNegTimesOK                    EQU        $04
  745. tcCounter                        EQU        $08
  746. TimeCodeDef                RECORD 0
  747. flags                     ds.l    1                ; offset: $0 (0)        ;  drop-frame, etc.
  748. fTimeScale                 ds.l    1                ; offset: $4 (4)        ;  time scale of frameDuration (eg. 2997)
  749. frameDuration             ds.l    1                ; offset: $8 (8)        ;  duration of each frame (eg. 100)
  750. numFrames                 ds.b    1                ; offset: $C (12)        ;  frames/sec for timecode (eg. 30) OR frames/tick for counter mode
  751. padding                     ds.b    1                ; offset: $D (13)        ;  unused padding byte
  752. sizeof                     EQU *                    ; size:   $E (14)
  753.                         ENDR
  754.  
  755. tctNegFlag                        EQU        $80                    ; negative bit is in minutes
  756. TimeCodeTime            RECORD 0
  757. hours                     ds.b    1                ; offset: $0 (0)
  758. minutes                     ds.b    1                ; offset: $1 (1)
  759. seconds                     ds.b    1                ; offset: $2 (2)
  760. frames                     ds.b    1                ; offset: $3 (3)
  761. sizeof                     EQU *                    ; size:   $4 (4)
  762.                         ENDR
  763. TimeCodeCounter            RECORD 0
  764. counter                     ds.l    1                ; offset: $0 (0)
  765. sizeof                     EQU *                    ; size:   $4 (4)
  766.                         ENDR
  767. TimeCodeDescription        RECORD 0
  768. descSize                 ds.l    1                ; offset: $0 (0)        ;  standard sample description header
  769. dataFormat                 ds.l    1                ; offset: $4 (4)
  770. resvd1                     ds.l    1                ; offset: $8 (8)
  771. resvd2                     ds.w    1                ; offset: $C (12)
  772. dataRefIndex             ds.w    1                ; offset: $E (14)
  773. flags                     ds.l    1                ; offset: $10 (16)        ;  timecode specific stuff
  774. timeCodeDef                 ds        TimeCodeDef        ; offset: $14 (20)
  775. srcRef                     ds.l    1                ; offset: $22 (34) <-- really an array of length one
  776. sizeof                     EQU *                    ; size:   $26 (38)
  777.                         ENDR
  778. ; typedef struct TimeCodeDescription *    TimeCodeDescriptionPtr
  779.  
  780. ; typedef TimeCodeDescriptionPtr *        TimeCodeDescriptionHandle
  781.  
  782.  
  783. tcdfShowTimeCode                EQU        $01
  784. ;
  785. ; pascal HandlerError TCGetCurrentTimeCode(MediaHandler mh, long *frameNum, TimeCodeDef *tcdef, TimeCodeRecord *tcrec, UserData *srcRefH)
  786. ;
  787.     IF ¬ GENERATINGCFM THEN
  788.         Macro
  789.         _TCGetCurrentTimeCode
  790.             dc.w                $2F3C
  791.             dc.w                $0010
  792.             dc.w                $0101
  793.             moveq               #0,d0
  794.             dc.w                $A82A
  795.         EndM
  796.     ELSE
  797.         IMPORT_CFM_FUNCTION TCGetCurrentTimeCode
  798.     ENDIF
  799.  
  800. ;
  801. ; pascal HandlerError TCGetTimeCodeAtTime(MediaHandler mh, TimeValue mediaTime, long *frameNum, TimeCodeDef *tcdef, TimeCodeRecord *tcdata, UserData *srcRefH)
  802. ;
  803.     IF ¬ GENERATINGCFM THEN
  804.         Macro
  805.         _TCGetTimeCodeAtTime
  806.             dc.w                $2F3C
  807.             dc.w                $0014
  808.             dc.w                $0102
  809.             moveq               #0,d0
  810.             dc.w                $A82A
  811.         EndM
  812.     ELSE
  813.         IMPORT_CFM_FUNCTION TCGetTimeCodeAtTime
  814.     ENDIF
  815.  
  816. ;
  817. ; pascal HandlerError TCTimeCodeToString(MediaHandler mh, TimeCodeDef *tcdef, TimeCodeRecord *tcrec, StringPtr tcStr)
  818. ;
  819.     IF ¬ GENERATINGCFM THEN
  820.         Macro
  821.         _TCTimeCodeToString
  822.             dc.w                $2F3C
  823.             dc.w                $000C
  824.             dc.w                $0103
  825.             moveq               #0,d0
  826.             dc.w                $A82A
  827.         EndM
  828.     ELSE
  829.         IMPORT_CFM_FUNCTION TCTimeCodeToString
  830.     ENDIF
  831.  
  832. ;
  833. ; pascal HandlerError TCTimeCodeToFrameNumber(MediaHandler mh, TimeCodeDef *tcdef, TimeCodeRecord *tcrec, long *frameNumber)
  834. ;
  835.     IF ¬ GENERATINGCFM THEN
  836.         Macro
  837.         _TCTimeCodeToFrameNumber
  838.             dc.w                $2F3C
  839.             dc.w                $000C
  840.             dc.w                $0104
  841.             moveq               #0,d0
  842.             dc.w                $A82A
  843.         EndM
  844.     ELSE
  845.         IMPORT_CFM_FUNCTION TCTimeCodeToFrameNumber
  846.     ENDIF
  847.  
  848. ;
  849. ; pascal HandlerError TCFrameNumberToTimeCode(MediaHandler mh, long frameNumber, TimeCodeDef *tcdef, TimeCodeRecord *tcrec)
  850. ;
  851.     IF ¬ GENERATINGCFM THEN
  852.         Macro
  853.         _TCFrameNumberToTimeCode
  854.             dc.w                $2F3C
  855.             dc.w                $000C
  856.             dc.w                $0105
  857.             moveq               #0,d0
  858.             dc.w                $A82A
  859.         EndM
  860.     ELSE
  861.         IMPORT_CFM_FUNCTION TCFrameNumberToTimeCode
  862.     ENDIF
  863.  
  864. ;
  865. ; pascal HandlerError TCGetSourceRef(MediaHandler mh, TimeCodeDescriptionHandle tcdH, UserData *srefH)
  866. ;
  867.     IF ¬ GENERATINGCFM THEN
  868.         Macro
  869.         _TCGetSourceRef
  870.             dc.w                $2F3C
  871.             dc.w                $0008
  872.             dc.w                $0106
  873.             moveq               #0,d0
  874.             dc.w                $A82A
  875.         EndM
  876.     ELSE
  877.         IMPORT_CFM_FUNCTION TCGetSourceRef
  878.     ENDIF
  879.  
  880. ;
  881. ; pascal HandlerError TCSetSourceRef(MediaHandler mh, TimeCodeDescriptionHandle tcdH, UserData srefH)
  882. ;
  883.     IF ¬ GENERATINGCFM THEN
  884.         Macro
  885.         _TCSetSourceRef
  886.             dc.w                $2F3C
  887.             dc.w                $0008
  888.             dc.w                $0107
  889.             moveq               #0,d0
  890.             dc.w                $A82A
  891.         EndM
  892.     ELSE
  893.         IMPORT_CFM_FUNCTION TCSetSourceRef
  894.     ENDIF
  895.  
  896. ;
  897. ; pascal HandlerError TCSetTimeCodeFlags(MediaHandler mh, long flags, long flagsMask)
  898. ;
  899.     IF ¬ GENERATINGCFM THEN
  900.         Macro
  901.         _TCSetTimeCodeFlags
  902.             dc.w                $2F3C
  903.             dc.w                $0008
  904.             dc.w                $0108
  905.             moveq               #0,d0
  906.             dc.w                $A82A
  907.         EndM
  908.     ELSE
  909.         IMPORT_CFM_FUNCTION TCSetTimeCodeFlags
  910.     ENDIF
  911.  
  912. ;
  913. ; pascal HandlerError TCGetTimeCodeFlags(MediaHandler mh, long *flags)
  914. ;
  915.     IF ¬ GENERATINGCFM THEN
  916.         Macro
  917.         _TCGetTimeCodeFlags
  918.             dc.w                $2F3C
  919.             dc.w                $0004
  920.             dc.w                $0109
  921.             moveq               #0,d0
  922.             dc.w                $A82A
  923.         EndM
  924.     ELSE
  925.         IMPORT_CFM_FUNCTION TCGetTimeCodeFlags
  926.     ENDIF
  927.  
  928. ;
  929. ; pascal HandlerError TCSetDisplayOptions(MediaHandler mh, TCTextOptionsPtr textOptions)
  930. ;
  931.     IF ¬ GENERATINGCFM THEN
  932.         Macro
  933.         _TCSetDisplayOptions
  934.             dc.w                $2F3C
  935.             dc.w                $0004
  936.             dc.w                $010A
  937.             moveq               #0,d0
  938.             dc.w                $A82A
  939.         EndM
  940.     ELSE
  941.         IMPORT_CFM_FUNCTION TCSetDisplayOptions
  942.     ENDIF
  943.  
  944. ;
  945. ; pascal HandlerError TCGetDisplayOptions(MediaHandler mh, TCTextOptionsPtr textOptions)
  946. ;
  947.     IF ¬ GENERATINGCFM THEN
  948.         Macro
  949.         _TCGetDisplayOptions
  950.             dc.w                $2F3C
  951.             dc.w                $0004
  952.             dc.w                $010B
  953.             moveq               #0,d0
  954.             dc.w                $A82A
  955.         EndM
  956.     ELSE
  957.         IMPORT_CFM_FUNCTION TCGetDisplayOptions
  958.     ENDIF
  959.  
  960. ; typedef ComponentInstance             MovieImportComponent
  961.  
  962. ; typedef ComponentInstance             MovieExportComponent
  963.  
  964.  
  965. MovieImportType                    EQU        'eat '
  966. MovieExportType                    EQU        'spit'
  967.  
  968. canMovieImportHandles            EQU        $01
  969. canMovieImportFiles                EQU        $02
  970. hasMovieImportUserInterface        EQU        $04
  971. canMovieExportHandles            EQU        $08
  972. canMovieExportFiles                EQU        $10
  973. hasMovieExportUserInterface        EQU        $20
  974. dontAutoFileMovieImport            EQU        $40
  975. canMovieExportAuxDataHandle        EQU        $80
  976. canMovieImportValidateHandles    EQU        $0100
  977. canMovieImportValidateFile        EQU        $0200
  978. dontRegisterWithEasyOpen        EQU        $0400
  979. canMovieImportInPlace            EQU        $0800
  980. movieImportSubTypeIsFileExtension EQU    $1000
  981.  
  982. movieImportCreateTrack            EQU        1
  983. movieImportInParallel            EQU        2
  984. movieImportMustUseTrack            EQU        4
  985.  
  986. movieImportResultUsedMultipleTracks EQU    8
  987.  
  988. kMovieExportTextOnly            EQU        0
  989. kMovieExportAbsoluteTime        EQU        1
  990. kMovieExportRelativeTime        EQU        2
  991.  
  992. kMIDIImportSilenceBefore        EQU        $01
  993. kMIDIImportSilenceAfter            EQU        $02
  994. kMIDIImport20Playable            EQU        $04
  995. kMIDIImportWantLyrics            EQU        $08
  996. ;
  997. ; pascal ComponentResult MovieImportHandle(MovieImportComponent ci, Handle dataH, Movie theMovie, Track targetTrack, Track *usedTrack, TimeValue atTime, TimeValue *addedDuration, long inFlags, long *outFlags)
  998. ;
  999.     IF ¬ GENERATINGCFM THEN
  1000.         Macro
  1001.         _MovieImportHandle
  1002.             dc.w                $2F3C
  1003.             dc.w                $0020
  1004.             dc.w                $0001
  1005.             moveq               #0,d0
  1006.             dc.w                $A82A
  1007.         EndM
  1008.     ELSE
  1009.         IMPORT_CFM_FUNCTION MovieImportHandle
  1010.     ENDIF
  1011.  
  1012. ;
  1013. ; pascal ComponentResult MovieImportFile(MovieImportComponent ci, const FSSpec *theFile, Movie theMovie, Track targetTrack, Track *usedTrack, TimeValue atTime, TimeValue *addedDuration, long inFlags, long *outFlags)
  1014. ;
  1015.     IF ¬ GENERATINGCFM THEN
  1016.         Macro
  1017.         _MovieImportFile
  1018.             dc.w                $2F3C
  1019.             dc.w                $0020
  1020.             dc.w                $0002
  1021.             moveq               #0,d0
  1022.             dc.w                $A82A
  1023.         EndM
  1024.     ELSE
  1025.         IMPORT_CFM_FUNCTION MovieImportFile
  1026.     ENDIF
  1027.  
  1028. ;
  1029. ; pascal ComponentResult MovieImportSetSampleDuration(MovieImportComponent ci, TimeValue duration, TimeScale scale)
  1030. ;
  1031.     IF ¬ GENERATINGCFM THEN
  1032.         Macro
  1033.         _MovieImportSetSampleDuration
  1034.             dc.w                $2F3C
  1035.             dc.w                $0008
  1036.             dc.w                $0003
  1037.             moveq               #0,d0
  1038.             dc.w                $A82A
  1039.         EndM
  1040.     ELSE
  1041.         IMPORT_CFM_FUNCTION MovieImportSetSampleDuration
  1042.     ENDIF
  1043.  
  1044. ;
  1045. ; pascal ComponentResult MovieImportSetSampleDescription(MovieImportComponent ci, SampleDescriptionHandle desc, OSType mediaType)
  1046. ;
  1047.     IF ¬ GENERATINGCFM THEN
  1048.         Macro
  1049.         _MovieImportSetSampleDescription
  1050.             dc.w                $2F3C
  1051.             dc.w                $0008
  1052.             dc.w                $0004
  1053.             moveq               #0,d0
  1054.             dc.w                $A82A
  1055.         EndM
  1056.     ELSE
  1057.         IMPORT_CFM_FUNCTION MovieImportSetSampleDescription
  1058.     ENDIF
  1059.  
  1060. ;
  1061. ; pascal ComponentResult MovieImportSetMediaFile(MovieImportComponent ci, AliasHandle alias)
  1062. ;
  1063.     IF ¬ GENERATINGCFM THEN
  1064.         Macro
  1065.         _MovieImportSetMediaFile
  1066.             dc.w                $2F3C
  1067.             dc.w                $0004
  1068.             dc.w                $0005
  1069.             moveq               #0,d0
  1070.             dc.w                $A82A
  1071.         EndM
  1072.     ELSE
  1073.         IMPORT_CFM_FUNCTION MovieImportSetMediaFile
  1074.     ENDIF
  1075.  
  1076. ;
  1077. ; pascal ComponentResult MovieImportSetDimensions(MovieImportComponent ci, Fixed width, Fixed height)
  1078. ;
  1079.     IF ¬ GENERATINGCFM THEN
  1080.         Macro
  1081.         _MovieImportSetDimensions
  1082.             dc.w                $2F3C
  1083.             dc.w                $0008
  1084.             dc.w                $0006
  1085.             moveq               #0,d0
  1086.             dc.w                $A82A
  1087.         EndM
  1088.     ELSE
  1089.         IMPORT_CFM_FUNCTION MovieImportSetDimensions
  1090.     ENDIF
  1091.  
  1092. ;
  1093. ; pascal ComponentResult MovieImportSetChunkSize(MovieImportComponent ci, long chunkSize)
  1094. ;
  1095.     IF ¬ GENERATINGCFM THEN
  1096.         Macro
  1097.         _MovieImportSetChunkSize
  1098.             dc.w                $2F3C
  1099.             dc.w                $0004
  1100.             dc.w                $0007
  1101.             moveq               #0,d0
  1102.             dc.w                $A82A
  1103.         EndM
  1104.     ELSE
  1105.         IMPORT_CFM_FUNCTION MovieImportSetChunkSize
  1106.     ENDIF
  1107.  
  1108. ;
  1109. ; pascal ComponentResult MovieImportSetProgressProc(MovieImportComponent ci, MovieProgressUPP proc, long refcon)
  1110. ;
  1111.     IF ¬ GENERATINGCFM THEN
  1112.         Macro
  1113.         _MovieImportSetProgressProc
  1114.             dc.w                $2F3C
  1115.             dc.w                $0008
  1116.             dc.w                $0008
  1117.             moveq               #0,d0
  1118.             dc.w                $A82A
  1119.         EndM
  1120.     ELSE
  1121.         IMPORT_CFM_FUNCTION MovieImportSetProgressProc
  1122.     ENDIF
  1123.  
  1124. ;
  1125. ; pascal ComponentResult MovieImportSetAuxiliaryData(MovieImportComponent ci, Handle data, OSType handleType)
  1126. ;
  1127.     IF ¬ GENERATINGCFM THEN
  1128.         Macro
  1129.         _MovieImportSetAuxiliaryData
  1130.             dc.w                $2F3C
  1131.             dc.w                $0008
  1132.             dc.w                $0009
  1133.             moveq               #0,d0
  1134.             dc.w                $A82A
  1135.         EndM
  1136.     ELSE
  1137.         IMPORT_CFM_FUNCTION MovieImportSetAuxiliaryData
  1138.     ENDIF
  1139.  
  1140. ;
  1141. ; pascal ComponentResult MovieImportSetFromScrap(MovieImportComponent ci, Boolean fromScrap)
  1142. ;
  1143.     IF ¬ GENERATINGCFM THEN
  1144.         Macro
  1145.         _MovieImportSetFromScrap
  1146.             dc.w                $2F3C
  1147.             dc.w                $0002
  1148.             dc.w                $000A
  1149.             moveq               #0,d0
  1150.             dc.w                $A82A
  1151.         EndM
  1152.     ELSE
  1153.         IMPORT_CFM_FUNCTION MovieImportSetFromScrap
  1154.     ENDIF
  1155.  
  1156. ;
  1157. ; pascal ComponentResult MovieImportDoUserDialog(MovieImportComponent ci, const FSSpec *theFile, Handle theData, Boolean *canceled)
  1158. ;
  1159.     IF ¬ GENERATINGCFM THEN
  1160.         Macro
  1161.         _MovieImportDoUserDialog
  1162.             dc.w                $2F3C
  1163.             dc.w                $000C
  1164.             dc.w                $000B
  1165.             moveq               #0,d0
  1166.             dc.w                $A82A
  1167.         EndM
  1168.     ELSE
  1169.         IMPORT_CFM_FUNCTION MovieImportDoUserDialog
  1170.     ENDIF
  1171.  
  1172. ;
  1173. ; pascal ComponentResult MovieImportSetDuration(MovieImportComponent ci, TimeValue duration)
  1174. ;
  1175.     IF ¬ GENERATINGCFM THEN
  1176.         Macro
  1177.         _MovieImportSetDuration
  1178.             dc.w                $2F3C
  1179.             dc.w                $0004
  1180.             dc.w                $000C
  1181.             moveq               #0,d0
  1182.             dc.w                $A82A
  1183.         EndM
  1184.     ELSE
  1185.         IMPORT_CFM_FUNCTION MovieImportSetDuration
  1186.     ENDIF
  1187.  
  1188. ;
  1189. ; pascal ComponentResult MovieImportGetAuxiliaryDataType(MovieImportComponent ci, OSType *auxType)
  1190. ;
  1191.     IF ¬ GENERATINGCFM THEN
  1192.         Macro
  1193.         _MovieImportGetAuxiliaryDataType
  1194.             dc.w                $2F3C
  1195.             dc.w                $0004
  1196.             dc.w                $000D
  1197.             moveq               #0,d0
  1198.             dc.w                $A82A
  1199.         EndM
  1200.     ELSE
  1201.         IMPORT_CFM_FUNCTION MovieImportGetAuxiliaryDataType
  1202.     ENDIF
  1203.  
  1204. ;
  1205. ; pascal ComponentResult MovieImportValidate(MovieImportComponent ci, const FSSpec *theFile, Handle theData, Boolean *valid)
  1206. ;
  1207.     IF ¬ GENERATINGCFM THEN
  1208.         Macro
  1209.         _MovieImportValidate
  1210.             dc.w                $2F3C
  1211.             dc.w                $000C
  1212.             dc.w                $000E
  1213.             moveq               #0,d0
  1214.             dc.w                $A82A
  1215.         EndM
  1216.     ELSE
  1217.         IMPORT_CFM_FUNCTION MovieImportValidate
  1218.     ENDIF
  1219.  
  1220. ;
  1221. ; pascal ComponentResult MovieImportGetFileType(MovieImportComponent ci, OSType *fileType)
  1222. ;
  1223.     IF ¬ GENERATINGCFM THEN
  1224.         Macro
  1225.         _MovieImportGetFileType
  1226.             dc.w                $2F3C
  1227.             dc.w                $0004
  1228.             dc.w                $000F
  1229.             moveq               #0,d0
  1230.             dc.w                $A82A
  1231.         EndM
  1232.     ELSE
  1233.         IMPORT_CFM_FUNCTION MovieImportGetFileType
  1234.     ENDIF
  1235.  
  1236. ;
  1237. ; pascal ComponentResult MovieImportDataRef(MovieImportComponent ci, Handle dataRef, OSType dataRefType, Movie theMovie, Track targetTrack, Track *usedTrack, TimeValue atTime, TimeValue *addedDuration, long inFlags, long *outFlags)
  1238. ;
  1239.     IF ¬ GENERATINGCFM THEN
  1240.         Macro
  1241.         _MovieImportDataRef
  1242.             dc.w                $2F3C
  1243.             dc.w                $0024
  1244.             dc.w                $0010
  1245.             moveq               #0,d0
  1246.             dc.w                $A82A
  1247.         EndM
  1248.     ELSE
  1249.         IMPORT_CFM_FUNCTION MovieImportDataRef
  1250.     ENDIF
  1251.  
  1252. ;
  1253. ; pascal ComponentResult MovieImportGetSampleDescription(MovieImportComponent ci, SampleDescriptionHandle *desc, OSType *mediaType)
  1254. ;
  1255.     IF ¬ GENERATINGCFM THEN
  1256.         Macro
  1257.         _MovieImportGetSampleDescription
  1258.             dc.w                $2F3C
  1259.             dc.w                $0008
  1260.             dc.w                $0011
  1261.             moveq               #0,d0
  1262.             dc.w                $A82A
  1263.         EndM
  1264.     ELSE
  1265.         IMPORT_CFM_FUNCTION MovieImportGetSampleDescription
  1266.     ENDIF
  1267.  
  1268. ;
  1269. ; pascal ComponentResult MovieExportToHandle(MovieExportComponent ci, Handle dataH, Movie theMovie, Track onlyThisTrack, TimeValue startTime, TimeValue duration)
  1270. ;
  1271.     IF ¬ GENERATINGCFM THEN
  1272.         Macro
  1273.         _MovieExportToHandle
  1274.             dc.w                $2F3C
  1275.             dc.w                $0014
  1276.             dc.w                $0080
  1277.             moveq               #0,d0
  1278.             dc.w                $A82A
  1279.         EndM
  1280.     ELSE
  1281.         IMPORT_CFM_FUNCTION MovieExportToHandle
  1282.     ENDIF
  1283.  
  1284. ;
  1285. ; pascal ComponentResult MovieExportToFile(MovieExportComponent ci, const FSSpec *theFile, Movie theMovie, Track onlyThisTrack, TimeValue startTime, TimeValue duration)
  1286. ;
  1287.     IF ¬ GENERATINGCFM THEN
  1288.         Macro
  1289.         _MovieExportToFile
  1290.             dc.w                $2F3C
  1291.             dc.w                $0014
  1292.             dc.w                $0081
  1293.             moveq               #0,d0
  1294.             dc.w                $A82A
  1295.         EndM
  1296.     ELSE
  1297.         IMPORT_CFM_FUNCTION MovieExportToFile
  1298.     ENDIF
  1299.  
  1300. ;
  1301. ; pascal ComponentResult MovieExportGetAuxiliaryData(MovieExportComponent ci, Handle dataH, OSType *handleType)
  1302. ;
  1303.     IF ¬ GENERATINGCFM THEN
  1304.         Macro
  1305.         _MovieExportGetAuxiliaryData
  1306.             dc.w                $2F3C
  1307.             dc.w                $0008
  1308.             dc.w                $0083
  1309.             moveq               #0,d0
  1310.             dc.w                $A82A
  1311.         EndM
  1312.     ELSE
  1313.         IMPORT_CFM_FUNCTION MovieExportGetAuxiliaryData
  1314.     ENDIF
  1315.  
  1316. ;
  1317. ; pascal ComponentResult MovieExportSetProgressProc(MovieExportComponent ci, MovieProgressUPP proc, long refcon)
  1318. ;
  1319.     IF ¬ GENERATINGCFM THEN
  1320.         Macro
  1321.         _MovieExportSetProgressProc
  1322.             dc.w                $2F3C
  1323.             dc.w                $0008
  1324.             dc.w                $0084
  1325.             moveq               #0,d0
  1326.             dc.w                $A82A
  1327.         EndM
  1328.     ELSE
  1329.         IMPORT_CFM_FUNCTION MovieExportSetProgressProc
  1330.     ENDIF
  1331.  
  1332. ;
  1333. ; pascal ComponentResult MovieExportSetSampleDescription(MovieExportComponent ci, SampleDescriptionHandle desc, OSType mediaType)
  1334. ;
  1335.     IF ¬ GENERATINGCFM THEN
  1336.         Macro
  1337.         _MovieExportSetSampleDescription
  1338.             dc.w                $2F3C
  1339.             dc.w                $0008
  1340.             dc.w                $0085
  1341.             moveq               #0,d0
  1342.             dc.w                $A82A
  1343.         EndM
  1344.     ELSE
  1345.         IMPORT_CFM_FUNCTION MovieExportSetSampleDescription
  1346.     ENDIF
  1347.  
  1348. ;
  1349. ; pascal ComponentResult MovieExportDoUserDialog(MovieExportComponent ci, Movie theMovie, Track onlyThisTrack, TimeValue startTime, TimeValue duration, Boolean *canceled)
  1350. ;
  1351.     IF ¬ GENERATINGCFM THEN
  1352.         Macro
  1353.         _MovieExportDoUserDialog
  1354.             dc.w                $2F3C
  1355.             dc.w                $0014
  1356.             dc.w                $0086
  1357.             moveq               #0,d0
  1358.             dc.w                $A82A
  1359.         EndM
  1360.     ELSE
  1361.         IMPORT_CFM_FUNCTION MovieExportDoUserDialog
  1362.     ENDIF
  1363.  
  1364. ;
  1365. ; pascal ComponentResult MovieExportGetCreatorType(MovieExportComponent ci, OSType *creator)
  1366. ;
  1367.     IF ¬ GENERATINGCFM THEN
  1368.         Macro
  1369.         _MovieExportGetCreatorType
  1370.             dc.w                $2F3C
  1371.             dc.w                $0004
  1372.             dc.w                $0087
  1373.             moveq               #0,d0
  1374.             dc.w                $A82A
  1375.         EndM
  1376.     ELSE
  1377.         IMPORT_CFM_FUNCTION MovieExportGetCreatorType
  1378.     ENDIF
  1379.  
  1380.      IF ¬ GENERATINGPOWERPC THEN 
  1381. ;  Text Export Display Info data structure
  1382. TextDisplayData            RECORD 0
  1383. displayFlags             ds.l    1                ; offset: $0 (0)
  1384. textJustification         ds.l    1                ; offset: $4 (4)
  1385. bgColor                     ds        RGBColor        ; offset: $8 (8)
  1386. textBox                     ds        Rect            ; offset: $E (14)
  1387. beginHilite                 ds.w    1                ; offset: $16 (22)
  1388. endHilite                 ds.w    1                ; offset: $18 (24)
  1389. hiliteColor                 ds        RGBColor        ; offset: $1A (26)
  1390. doHiliteColor             ds.b    1                ; offset: $20 (32)
  1391. filler                     ds.b    1                ; offset: $21 (33)
  1392. scrollDelayDur             ds.l    1                ; offset: $22 (34)
  1393. dropShadowOffset         ds        Point            ; offset: $26 (38)
  1394. dropShadowTransparency     ds.w    1                ; offset: $2A (42)
  1395. sizeof                     EQU *                    ; size:   $2C (44)
  1396.                         ENDR
  1397.     ENDIF
  1398. ; typedef ComponentInstance             TextExportComponent
  1399.  
  1400. ;
  1401. ; pascal ComponentResult TextExportGetDisplayData(TextExportComponent ci, TextDisplayData *textDisplay)
  1402. ;
  1403.     IF ¬ GENERATINGCFM THEN
  1404.         Macro
  1405.         _TextExportGetDisplayData
  1406.             dc.w                $2F3C
  1407.             dc.w                $0004
  1408.             dc.w                $0100
  1409.             moveq               #0,d0
  1410.             dc.w                $A82A
  1411.         EndM
  1412.     ELSE
  1413.         IMPORT_CFM_FUNCTION TextExportGetDisplayData
  1414.     ENDIF
  1415.  
  1416. ;
  1417. ; pascal ComponentResult TextExportGetTimeFraction(TextExportComponent ci, long *movieTimeFraction)
  1418. ;
  1419.     IF ¬ GENERATINGCFM THEN
  1420.         Macro
  1421.         _TextExportGetTimeFraction
  1422.             dc.w                $2F3C
  1423.             dc.w                $0004
  1424.             dc.w                $0101
  1425.             moveq               #0,d0
  1426.             dc.w                $A82A
  1427.         EndM
  1428.     ELSE
  1429.         IMPORT_CFM_FUNCTION TextExportGetTimeFraction
  1430.     ENDIF
  1431.  
  1432. ;
  1433. ; pascal ComponentResult TextExportSetTimeFraction(TextExportComponent ci, long movieTimeFraction)
  1434. ;
  1435.     IF ¬ GENERATINGCFM THEN
  1436.         Macro
  1437.         _TextExportSetTimeFraction
  1438.             dc.w                $2F3C
  1439.             dc.w                $0004
  1440.             dc.w                $0102
  1441.             moveq               #0,d0
  1442.             dc.w                $A82A
  1443.         EndM
  1444.     ELSE
  1445.         IMPORT_CFM_FUNCTION TextExportSetTimeFraction
  1446.     ENDIF
  1447.  
  1448. ;
  1449. ; pascal ComponentResult TextExportGetSettings(TextExportComponent ci, long *setting)
  1450. ;
  1451.     IF ¬ GENERATINGCFM THEN
  1452.         Macro
  1453.         _TextExportGetSettings
  1454.             dc.w                $2F3C
  1455.             dc.w                $0004
  1456.             dc.w                $0103
  1457.             moveq               #0,d0
  1458.             dc.w                $A82A
  1459.         EndM
  1460.     ELSE
  1461.         IMPORT_CFM_FUNCTION TextExportGetSettings
  1462.     ENDIF
  1463.  
  1464. ;
  1465. ; pascal ComponentResult TextExportSetSettings(TextExportComponent ci, long setting)
  1466. ;
  1467.     IF ¬ GENERATINGCFM THEN
  1468.         Macro
  1469.         _TextExportSetSettings
  1470.             dc.w                $2F3C
  1471.             dc.w                $0004
  1472.             dc.w                $0104
  1473.             moveq               #0,d0
  1474.             dc.w                $A82A
  1475.         EndM
  1476.     ELSE
  1477.         IMPORT_CFM_FUNCTION TextExportSetSettings
  1478.     ENDIF
  1479.  
  1480. ;
  1481. ; pascal ComponentResult MIDIImportGetSettings(TextExportComponent ci, long *setting)
  1482. ;
  1483.     IF ¬ GENERATINGCFM THEN
  1484.         Macro
  1485.         _MIDIImportGetSettings
  1486.             dc.w                $2F3C
  1487.             dc.w                $0004
  1488.             dc.w                $0100
  1489.             moveq               #0,d0
  1490.             dc.w                $A82A
  1491.         EndM
  1492.     ELSE
  1493.         IMPORT_CFM_FUNCTION MIDIImportGetSettings
  1494.     ENDIF
  1495.  
  1496. ;
  1497. ; pascal ComponentResult MIDIImportSetSettings(TextExportComponent ci, long setting)
  1498. ;
  1499.     IF ¬ GENERATINGCFM THEN
  1500.         Macro
  1501.         _MIDIImportSetSettings
  1502.             dc.w                $2F3C
  1503.             dc.w                $0004
  1504.             dc.w                $0101
  1505.             moveq               #0,d0
  1506.             dc.w                $A82A
  1507.         EndM
  1508.     ELSE
  1509.         IMPORT_CFM_FUNCTION MIDIImportSetSettings
  1510.     ENDIF
  1511.  
  1512. ;
  1513. ;**************
  1514. ;
  1515. ;    File Preview Components
  1516. ;
  1517. ;**************
  1518. ;
  1519. ; typedef ComponentInstance             pnotComponent
  1520.  
  1521.  
  1522. pnotComponentWantsEvents        EQU        1
  1523. pnotComponentNeedsNoCache        EQU        2
  1524.  
  1525. ShowFilePreviewComponentType    EQU        'pnot'
  1526. CreateFilePreviewComponentType    EQU        'pmak'
  1527. ;
  1528. ; pascal ComponentResult PreviewShowData(pnotComponent p, OSType dataType, Handle data, const Rect *inHere)
  1529. ;
  1530.     IF ¬ GENERATINGCFM THEN
  1531.         Macro
  1532.         _PreviewShowData
  1533.             dc.w                $2F3C
  1534.             dc.w                $000C
  1535.             dc.w                $0001
  1536.             moveq               #0,d0
  1537.             dc.w                $A82A
  1538.         EndM
  1539.     ELSE
  1540.         IMPORT_CFM_FUNCTION PreviewShowData
  1541.     ENDIF
  1542.  
  1543. ;
  1544. ; pascal ComponentResult PreviewMakePreview(pnotComponent p, OSType *previewType, Handle *previewResult, const FSSpec *sourceFile, ICMProgressProcRecordPtr progress)
  1545. ;
  1546.     IF ¬ GENERATINGCFM THEN
  1547.         Macro
  1548.         _PreviewMakePreview
  1549.             dc.w                $2F3C
  1550.             dc.w                $0010
  1551.             dc.w                $0002
  1552.             moveq               #0,d0
  1553.             dc.w                $A82A
  1554.         EndM
  1555.     ELSE
  1556.         IMPORT_CFM_FUNCTION PreviewMakePreview
  1557.     ENDIF
  1558.  
  1559. ;
  1560. ; pascal ComponentResult PreviewMakePreviewReference(pnotComponent p, OSType *previewType, short *resID, const FSSpec *sourceFile)
  1561. ;
  1562.     IF ¬ GENERATINGCFM THEN
  1563.         Macro
  1564.         _PreviewMakePreviewReference
  1565.             dc.w                $2F3C
  1566.             dc.w                $000C
  1567.             dc.w                $0003
  1568.             moveq               #0,d0
  1569.             dc.w                $A82A
  1570.         EndM
  1571.     ELSE
  1572.         IMPORT_CFM_FUNCTION PreviewMakePreviewReference
  1573.     ENDIF
  1574.  
  1575. ;
  1576. ; pascal ComponentResult PreviewEvent(pnotComponent p, EventRecord *e, Boolean *handledEvent)
  1577. ;
  1578.     IF ¬ GENERATINGCFM THEN
  1579.         Macro
  1580.         _PreviewEvent
  1581.             dc.w                $2F3C
  1582.             dc.w                $0008
  1583.             dc.w                $0004
  1584.             moveq               #0,d0
  1585.             dc.w                $A82A
  1586.         EndM
  1587.     ELSE
  1588.         IMPORT_CFM_FUNCTION PreviewEvent
  1589.     ENDIF
  1590.  
  1591.  
  1592. kDataHCanRead                    EQU        $00000001
  1593. kDataHSpecialRead                EQU        $00000002
  1594. kDataHSpecialReadFile            EQU        $00000004
  1595. kDataHCanWrite                    EQU        $00000008
  1596. kDataHSpecialWrite                EQU        $10
  1597. kDataHSpecialWriteFile            EQU        $20
  1598. kDataHCanStreamingWrite            EQU        $40
  1599. kDataHMustCheckDataRef            EQU        $80
  1600. DataHVolumeListRecord    RECORD 0
  1601. vRefNum                     ds.w    1                ; offset: $0 (0)
  1602. flags                     ds.l    1                ; offset: $2 (2)
  1603. sizeof                     EQU *                    ; size:   $6 (6)
  1604.                         ENDR
  1605. ; typedef struct DataHVolumeListRecord * DataHVolumeListPtr
  1606.  
  1607. ; typedef DataHVolumeListPtr *            DataHVolumeList
  1608.  
  1609.  
  1610. kDataHExtendedSchedule            EQU        'xtnd'
  1611. DataHScheduleRecord        RECORD 0
  1612. timeNeededBy             ds        TimeRecord        ; offset: $0 (0)
  1613. extendedID                 ds.l    1                ; offset: $10 (16)        ;  always is kDataHExtendedSchedule
  1614. extendedVers             ds.l    1                ; offset: $14 (20)        ;  always set to 0
  1615. priority                 ds.l    1                ; offset: $18 (24)        ;  100.0 or more means must have. lower numbers…
  1616. sizeof                     EQU *                    ; size:   $1C (28)
  1617.                         ENDR
  1618. ; typedef struct DataHScheduleRecord *    DataHSchedulePtr
  1619.  
  1620. ;
  1621. ; pascal ComponentResult DataHGetData(DataHandler dh, Handle h, long hOffset, long offset, long size)
  1622. ;
  1623.     IF ¬ GENERATINGCFM THEN
  1624.         Macro
  1625.         _DataHGetData
  1626.             dc.w                $2F3C
  1627.             dc.w                $0010
  1628.             dc.w                $0002
  1629.             moveq               #0,d0
  1630.             dc.w                $A82A
  1631.         EndM
  1632.     ELSE
  1633.         IMPORT_CFM_FUNCTION DataHGetData
  1634.     ENDIF
  1635.  
  1636. ;
  1637. ; pascal ComponentResult DataHPutData(DataHandler dh, Handle h, long hOffset, long *offset, long size)
  1638. ;
  1639.     IF ¬ GENERATINGCFM THEN
  1640.         Macro
  1641.         _DataHPutData
  1642.             dc.w                $2F3C
  1643.             dc.w                $0010
  1644.             dc.w                $0003
  1645.             moveq               #0,d0
  1646.             dc.w                $A82A
  1647.         EndM
  1648.     ELSE
  1649.         IMPORT_CFM_FUNCTION DataHPutData
  1650.     ENDIF
  1651.  
  1652. ;
  1653. ; pascal ComponentResult DataHFlushData(DataHandler dh)
  1654. ;
  1655.     IF ¬ GENERATINGCFM THEN
  1656.         Macro
  1657.         _DataHFlushData
  1658.             dc.w                $2F3C
  1659.             dc.w                $0000
  1660.             dc.w                $0004
  1661.             moveq               #0,d0
  1662.             dc.w                $A82A
  1663.         EndM
  1664.     ELSE
  1665.         IMPORT_CFM_FUNCTION DataHFlushData
  1666.     ENDIF
  1667.  
  1668. ;
  1669. ; pascal ComponentResult DataHOpenForWrite(DataHandler dh)
  1670. ;
  1671.     IF ¬ GENERATINGCFM THEN
  1672.         Macro
  1673.         _DataHOpenForWrite
  1674.             dc.w                $2F3C
  1675.             dc.w                $0000
  1676.             dc.w                $0005
  1677.             moveq               #0,d0
  1678.             dc.w                $A82A
  1679.         EndM
  1680.     ELSE
  1681.         IMPORT_CFM_FUNCTION DataHOpenForWrite
  1682.     ENDIF
  1683.  
  1684. ;
  1685. ; pascal ComponentResult DataHCloseForWrite(DataHandler dh)
  1686. ;
  1687.     IF ¬ GENERATINGCFM THEN
  1688.         Macro
  1689.         _DataHCloseForWrite
  1690.             dc.w                $2F3C
  1691.             dc.w                $0000
  1692.             dc.w                $0006
  1693.             moveq               #0,d0
  1694.             dc.w                $A82A
  1695.         EndM
  1696.     ELSE
  1697.         IMPORT_CFM_FUNCTION DataHCloseForWrite
  1698.     ENDIF
  1699.  
  1700. ;
  1701. ; pascal ComponentResult DataHOpenForRead(DataHandler dh)
  1702. ;
  1703.     IF ¬ GENERATINGCFM THEN
  1704.         Macro
  1705.         _DataHOpenForRead
  1706.             dc.w                $2F3C
  1707.             dc.w                $0000
  1708.             dc.w                $0008
  1709.             moveq               #0,d0
  1710.             dc.w                $A82A
  1711.         EndM
  1712.     ELSE
  1713.         IMPORT_CFM_FUNCTION DataHOpenForRead
  1714.     ENDIF
  1715.  
  1716. ;
  1717. ; pascal ComponentResult DataHCloseForRead(DataHandler dh)
  1718. ;
  1719.     IF ¬ GENERATINGCFM THEN
  1720.         Macro
  1721.         _DataHCloseForRead
  1722.             dc.w                $2F3C
  1723.             dc.w                $0000
  1724.             dc.w                $0009
  1725.             moveq               #0,d0
  1726.             dc.w                $A82A
  1727.         EndM
  1728.     ELSE
  1729.         IMPORT_CFM_FUNCTION DataHCloseForRead
  1730.     ENDIF
  1731.  
  1732. ;
  1733. ; pascal ComponentResult DataHSetDataRef(DataHandler dh, Handle dataRef)
  1734. ;
  1735.     IF ¬ GENERATINGCFM THEN
  1736.         Macro
  1737.         _DataHSetDataRef
  1738.             dc.w                $2F3C
  1739.             dc.w                $0004
  1740.             dc.w                $000A
  1741.             moveq               #0,d0
  1742.             dc.w                $A82A
  1743.         EndM
  1744.     ELSE
  1745.         IMPORT_CFM_FUNCTION DataHSetDataRef
  1746.     ENDIF
  1747.  
  1748. ;
  1749. ; pascal ComponentResult DataHGetDataRef(DataHandler dh, Handle *dataRef)
  1750. ;
  1751.     IF ¬ GENERATINGCFM THEN
  1752.         Macro
  1753.         _DataHGetDataRef
  1754.             dc.w                $2F3C
  1755.             dc.w                $0004
  1756.             dc.w                $000B
  1757.             moveq               #0,d0
  1758.             dc.w                $A82A
  1759.         EndM
  1760.     ELSE
  1761.         IMPORT_CFM_FUNCTION DataHGetDataRef
  1762.     ENDIF
  1763.  
  1764. ;
  1765. ; pascal ComponentResult DataHCompareDataRef(DataHandler dh, Handle dataRef, Boolean *equal)
  1766. ;
  1767.     IF ¬ GENERATINGCFM THEN
  1768.         Macro
  1769.         _DataHCompareDataRef
  1770.             dc.w                $2F3C
  1771.             dc.w                $0008
  1772.             dc.w                $000C
  1773.             moveq               #0,d0
  1774.             dc.w                $A82A
  1775.         EndM
  1776.     ELSE
  1777.         IMPORT_CFM_FUNCTION DataHCompareDataRef
  1778.     ENDIF
  1779.  
  1780. ;
  1781. ; pascal ComponentResult DataHTask(DataHandler dh)
  1782. ;
  1783.     IF ¬ GENERATINGCFM THEN
  1784.         Macro
  1785.         _DataHTask
  1786.             dc.w                $2F3C
  1787.             dc.w                $0000
  1788.             dc.w                $000D
  1789.             moveq               #0,d0
  1790.             dc.w                $A82A
  1791.         EndM
  1792.     ELSE
  1793.         IMPORT_CFM_FUNCTION DataHTask
  1794.     ENDIF
  1795.  
  1796. ;
  1797. ; pascal ComponentResult DataHScheduleData(DataHandler dh, Ptr PlaceToPutDataPtr, long FileOffset, long DataSize, long RefCon, DataHSchedulePtr scheduleRec, DataHCompletionUPP CompletionRtn)
  1798. ;
  1799.     IF ¬ GENERATINGCFM THEN
  1800.         Macro
  1801.         _DataHScheduleData
  1802.             dc.w                $2F3C
  1803.             dc.w                $0018
  1804.             dc.w                $000E
  1805.             moveq               #0,d0
  1806.             dc.w                $A82A
  1807.         EndM
  1808.     ELSE
  1809.         IMPORT_CFM_FUNCTION DataHScheduleData
  1810.     ENDIF
  1811.  
  1812. ;
  1813. ; pascal ComponentResult DataHFinishData(DataHandler dh, Ptr PlaceToPutDataPtr, Boolean Cancel)
  1814. ;
  1815.     IF ¬ GENERATINGCFM THEN
  1816.         Macro
  1817.         _DataHFinishData
  1818.             dc.w                $2F3C
  1819.             dc.w                $0006
  1820.             dc.w                $000F
  1821.             moveq               #0,d0
  1822.             dc.w                $A82A
  1823.         EndM
  1824.     ELSE
  1825.         IMPORT_CFM_FUNCTION DataHFinishData
  1826.     ENDIF
  1827.  
  1828. ;
  1829. ; pascal ComponentResult DataHFlushCache(DataHandler dh)
  1830. ;
  1831.     IF ¬ GENERATINGCFM THEN
  1832.         Macro
  1833.         _DataHFlushCache
  1834.             dc.w                $2F3C
  1835.             dc.w                $0000
  1836.             dc.w                $0010
  1837.             moveq               #0,d0
  1838.             dc.w                $A82A
  1839.         EndM
  1840.     ELSE
  1841.         IMPORT_CFM_FUNCTION DataHFlushCache
  1842.     ENDIF
  1843.  
  1844. ;
  1845. ; pascal ComponentResult DataHResolveDataRef(DataHandler dh, Handle theDataRef, Boolean *wasChanged, Boolean userInterfaceAllowed)
  1846. ;
  1847.     IF ¬ GENERATINGCFM THEN
  1848.         Macro
  1849.         _DataHResolveDataRef
  1850.             dc.w                $2F3C
  1851.             dc.w                $000A
  1852.             dc.w                $0011
  1853.             moveq               #0,d0
  1854.             dc.w                $A82A
  1855.         EndM
  1856.     ELSE
  1857.         IMPORT_CFM_FUNCTION DataHResolveDataRef
  1858.     ENDIF
  1859.  
  1860. ;
  1861. ; pascal ComponentResult DataHGetFileSize(DataHandler dh, long *fileSize)
  1862. ;
  1863.     IF ¬ GENERATINGCFM THEN
  1864.         Macro
  1865.         _DataHGetFileSize
  1866.             dc.w                $2F3C
  1867.             dc.w                $0004
  1868.             dc.w                $0012
  1869.             moveq               #0,d0
  1870.             dc.w                $A82A
  1871.         EndM
  1872.     ELSE
  1873.         IMPORT_CFM_FUNCTION DataHGetFileSize
  1874.     ENDIF
  1875.  
  1876. ;
  1877. ; pascal ComponentResult DataHCanUseDataRef(DataHandler dh, Handle dataRef, long *useFlags)
  1878. ;
  1879.     IF ¬ GENERATINGCFM THEN
  1880.         Macro
  1881.         _DataHCanUseDataRef
  1882.             dc.w                $2F3C
  1883.             dc.w                $0008
  1884.             dc.w                $0013
  1885.             moveq               #0,d0
  1886.             dc.w                $A82A
  1887.         EndM
  1888.     ELSE
  1889.         IMPORT_CFM_FUNCTION DataHCanUseDataRef
  1890.     ENDIF
  1891.  
  1892. ;
  1893. ; pascal ComponentResult DataHGetVolumeList(DataHandler dh, DataHVolumeList *volumeList)
  1894. ;
  1895.     IF ¬ GENERATINGCFM THEN
  1896.         Macro
  1897.         _DataHGetVolumeList
  1898.             dc.w                $2F3C
  1899.             dc.w                $0004
  1900.             dc.w                $0014
  1901.             moveq               #0,d0
  1902.             dc.w                $A82A
  1903.         EndM
  1904.     ELSE
  1905.         IMPORT_CFM_FUNCTION DataHGetVolumeList
  1906.     ENDIF
  1907.  
  1908. ;
  1909. ; pascal ComponentResult DataHWrite(DataHandler dh, Ptr data, long offset, long size, DataHCompletionUPP completion, long refCon)
  1910. ;
  1911.     IF ¬ GENERATINGCFM THEN
  1912.         Macro
  1913.         _DataHWrite
  1914.             dc.w                $2F3C
  1915.             dc.w                $0014
  1916.             dc.w                $0015
  1917.             moveq               #0,d0
  1918.             dc.w                $A82A
  1919.         EndM
  1920.     ELSE
  1921.         IMPORT_CFM_FUNCTION DataHWrite
  1922.     ENDIF
  1923.  
  1924. ;
  1925. ; pascal ComponentResult DataHPreextend(DataHandler dh, long maxToAdd, long *spaceAdded)
  1926. ;
  1927.     IF ¬ GENERATINGCFM THEN
  1928.         Macro
  1929.         _DataHPreextend
  1930.             dc.w                $2F3C
  1931.             dc.w                $0008
  1932.             dc.w                $0016
  1933.             moveq               #0,d0
  1934.             dc.w                $A82A
  1935.         EndM
  1936.     ELSE
  1937.         IMPORT_CFM_FUNCTION DataHPreextend
  1938.     ENDIF
  1939.  
  1940. ;
  1941. ; pascal ComponentResult DataHSetFileSize(DataHandler dh, long fileSize)
  1942. ;
  1943.     IF ¬ GENERATINGCFM THEN
  1944.         Macro
  1945.         _DataHSetFileSize
  1946.             dc.w                $2F3C
  1947.             dc.w                $0004
  1948.             dc.w                $0017
  1949.             moveq               #0,d0
  1950.             dc.w                $A82A
  1951.         EndM
  1952.     ELSE
  1953.         IMPORT_CFM_FUNCTION DataHSetFileSize
  1954.     ENDIF
  1955.  
  1956. ;
  1957. ; pascal ComponentResult DataHGetFreeSpace(DataHandler dh, unsigned long *freeSize)
  1958. ;
  1959.     IF ¬ GENERATINGCFM THEN
  1960.         Macro
  1961.         _DataHGetFreeSpace
  1962.             dc.w                $2F3C
  1963.             dc.w                $0004
  1964.             dc.w                $0018
  1965.             moveq               #0,d0
  1966.             dc.w                $A82A
  1967.         EndM
  1968.     ELSE
  1969.         IMPORT_CFM_FUNCTION DataHGetFreeSpace
  1970.     ENDIF
  1971.  
  1972. ;
  1973. ; pascal ComponentResult DataHCreateFile(DataHandler dh, OSType creator, Boolean deleteExisting)
  1974. ;
  1975.     IF ¬ GENERATINGCFM THEN
  1976.         Macro
  1977.         _DataHCreateFile
  1978.             dc.w                $2F3C
  1979.             dc.w                $0006
  1980.             dc.w                $0019
  1981.             moveq               #0,d0
  1982.             dc.w                $A82A
  1983.         EndM
  1984.     ELSE
  1985.         IMPORT_CFM_FUNCTION DataHCreateFile
  1986.     ENDIF
  1987.  
  1988. ;
  1989. ; pascal ComponentResult DataHGetPreferredBlockSize(DataHandler dh, long *blockSize)
  1990. ;
  1991.     IF ¬ GENERATINGCFM THEN
  1992.         Macro
  1993.         _DataHGetPreferredBlockSize
  1994.             dc.w                $2F3C
  1995.             dc.w                $0004
  1996.             dc.w                $001A
  1997.             moveq               #0,d0
  1998.             dc.w                $A82A
  1999.         EndM
  2000.     ELSE
  2001.         IMPORT_CFM_FUNCTION DataHGetPreferredBlockSize
  2002.     ENDIF
  2003.  
  2004. ;
  2005. ; pascal ComponentResult DataHGetDeviceIndex(DataHandler dh, long *deviceIndex)
  2006. ;
  2007.     IF ¬ GENERATINGCFM THEN
  2008.         Macro
  2009.         _DataHGetDeviceIndex
  2010.             dc.w                $2F3C
  2011.             dc.w                $0004
  2012.             dc.w                $001B
  2013.             moveq               #0,d0
  2014.             dc.w                $A82A
  2015.         EndM
  2016.     ELSE
  2017.         IMPORT_CFM_FUNCTION DataHGetDeviceIndex
  2018.     ENDIF
  2019.  
  2020. ;
  2021. ; pascal ComponentResult DataHIsStreamingDataHandler(DataHandler dh, Boolean *yes)
  2022. ;
  2023.     IF ¬ GENERATINGCFM THEN
  2024.         Macro
  2025.         _DataHIsStreamingDataHandler
  2026.             dc.w                $2F3C
  2027.             dc.w                $0004
  2028.             dc.w                $001C
  2029.             moveq               #0,d0
  2030.             dc.w                $A82A
  2031.         EndM
  2032.     ELSE
  2033.         IMPORT_CFM_FUNCTION DataHIsStreamingDataHandler
  2034.     ENDIF
  2035.  
  2036. ;
  2037. ; pascal ComponentResult DataHGetDataInBuffer(DataHandler dh, long startOffset, long *size)
  2038. ;
  2039.     IF ¬ GENERATINGCFM THEN
  2040.         Macro
  2041.         _DataHGetDataInBuffer
  2042.             dc.w                $2F3C
  2043.             dc.w                $0008
  2044.             dc.w                $001D
  2045.             moveq               #0,d0
  2046.             dc.w                $A82A
  2047.         EndM
  2048.     ELSE
  2049.         IMPORT_CFM_FUNCTION DataHGetDataInBuffer
  2050.     ENDIF
  2051.  
  2052. ;
  2053. ; pascal ComponentResult DataHGetScheduleAheadTime(DataHandler dh, long *millisecs)
  2054. ;
  2055.     IF ¬ GENERATINGCFM THEN
  2056.         Macro
  2057.         _DataHGetScheduleAheadTime
  2058.             dc.w                $2F3C
  2059.             dc.w                $0004
  2060.             dc.w                $001E
  2061.             moveq               #0,d0
  2062.             dc.w                $A82A
  2063.         EndM
  2064.     ELSE
  2065.         IMPORT_CFM_FUNCTION DataHGetScheduleAheadTime
  2066.     ENDIF
  2067.  
  2068. ;
  2069. ; pascal ComponentResult DataHSetCacheSizeLimit(DataHandler dh, Size cacheSizeLimit)
  2070. ;
  2071.     IF ¬ GENERATINGCFM THEN
  2072.         Macro
  2073.         _DataHSetCacheSizeLimit
  2074.             dc.w                $2F3C
  2075.             dc.w                $0004
  2076.             dc.w                $001F
  2077.             moveq               #0,d0
  2078.             dc.w                $A82A
  2079.         EndM
  2080.     ELSE
  2081.         IMPORT_CFM_FUNCTION DataHSetCacheSizeLimit
  2082.     ENDIF
  2083.  
  2084. ;
  2085. ; pascal ComponentResult DataHGetCacheSizeLimit(DataHandler dh, Size *cacheSizeLimit)
  2086. ;
  2087.     IF ¬ GENERATINGCFM THEN
  2088.         Macro
  2089.         _DataHGetCacheSizeLimit
  2090.             dc.w                $2F3C
  2091.             dc.w                $0004
  2092.             dc.w                $0020
  2093.             moveq               #0,d0
  2094.             dc.w                $A82A
  2095.         EndM
  2096.     ELSE
  2097.         IMPORT_CFM_FUNCTION DataHGetCacheSizeLimit
  2098.     ENDIF
  2099.  
  2100. ;
  2101. ; pascal ComponentResult DataHGetMovie(DataHandler dh, Movie *theMovie, short *id)
  2102. ;
  2103.     IF ¬ GENERATINGCFM THEN
  2104.         Macro
  2105.         _DataHGetMovie
  2106.             dc.w                $2F3C
  2107.             dc.w                $0008
  2108.             dc.w                $0021
  2109.             moveq               #0,d0
  2110.             dc.w                $A82A
  2111.         EndM
  2112.     ELSE
  2113.         IMPORT_CFM_FUNCTION DataHGetMovie
  2114.     ENDIF
  2115.  
  2116. ;
  2117. ; pascal ComponentResult DataHAddMovie(DataHandler dh, Movie theMovie, short *id)
  2118. ;
  2119.     IF ¬ GENERATINGCFM THEN
  2120.         Macro
  2121.         _DataHAddMovie
  2122.             dc.w                $2F3C
  2123.             dc.w                $0008
  2124.             dc.w                $0022
  2125.             moveq               #0,d0
  2126.             dc.w                $A82A
  2127.         EndM
  2128.     ELSE
  2129.         IMPORT_CFM_FUNCTION DataHAddMovie
  2130.     ENDIF
  2131.  
  2132. ;
  2133. ; pascal ComponentResult DataHUpdateMovie(DataHandler dh, Movie theMovie, short id)
  2134. ;
  2135.     IF ¬ GENERATINGCFM THEN
  2136.         Macro
  2137.         _DataHUpdateMovie
  2138.             dc.w                $2F3C
  2139.             dc.w                $0006
  2140.             dc.w                $0023
  2141.             moveq               #0,d0
  2142.             dc.w                $A82A
  2143.         EndM
  2144.     ELSE
  2145.         IMPORT_CFM_FUNCTION DataHUpdateMovie
  2146.     ENDIF
  2147.  
  2148. ;
  2149. ; pascal ComponentResult DataHDoesBuffer(DataHandler dh, Boolean *buffersReads, Boolean *buffersWrites)
  2150. ;
  2151.     IF ¬ GENERATINGCFM THEN
  2152.         Macro
  2153.         _DataHDoesBuffer
  2154.             dc.w                $2F3C
  2155.             dc.w                $0008
  2156.             dc.w                $0024
  2157.             moveq               #0,d0
  2158.             dc.w                $A82A
  2159.         EndM
  2160.     ELSE
  2161.         IMPORT_CFM_FUNCTION DataHDoesBuffer
  2162.     ENDIF
  2163.  
  2164. ;
  2165. ; pascal ComponentResult DataHGetFileName(DataHandler dh, Str255 str)
  2166. ;
  2167.     IF ¬ GENERATINGCFM THEN
  2168.         Macro
  2169.         _DataHGetFileName
  2170.             dc.w                $2F3C
  2171.             dc.w                $0004
  2172.             dc.w                $0025
  2173.             moveq               #0,d0
  2174.             dc.w                $A82A
  2175.         EndM
  2176.     ELSE
  2177.         IMPORT_CFM_FUNCTION DataHGetFileName
  2178.     ENDIF
  2179.  
  2180. ;
  2181. ; pascal ComponentResult DataHPlaybackHints(DataHandler dh, long flags, unsigned long minFileOffset, unsigned long maxFileOffset, long bytesPerSecond)
  2182. ;
  2183.     IF ¬ GENERATINGCFM THEN
  2184.         Macro
  2185.         _DataHPlaybackHints
  2186.             dc.w                $2F3C
  2187.             dc.w                $0010
  2188.             dc.w                $0103
  2189.             moveq               #0,d0
  2190.             dc.w                $A82A
  2191.         EndM
  2192.     ELSE
  2193.         IMPORT_CFM_FUNCTION DataHPlaybackHints
  2194.     ENDIF
  2195.  
  2196. ;  Standard type for video digitizers 
  2197.  
  2198. videoDigitizerComponentType        EQU        'vdig'
  2199. vdigInterfaceRev                EQU        2
  2200. ;  Input Format Standards 
  2201.  
  2202. ntscIn                            EQU        0                    ; current input format 
  2203. currentIn                        EQU        0                    ; ntsc input format 
  2204. palIn                            EQU        1                    ; pal input format 
  2205. secamIn                            EQU        2                    ; secam input format 
  2206. ntscReallyIn                    EQU        3                    ; ntsc input format 
  2207. ;  Input Formats 
  2208.  
  2209. compositeIn                        EQU        0                    ; input is composite format 
  2210. sVideoIn                        EQU        1                    ; input is sVideo format 
  2211. rgbComponentIn                    EQU        2                    ; input is rgb component format 
  2212. rgbComponentSyncIn                EQU        3                    ; input is rgb component format (sync on green?)
  2213. yuvComponentIn                    EQU        4                    ; input is yuv component format 
  2214. yuvComponentSyncIn                EQU        5                    ; input is yuv component format (sync on green?) 
  2215. tvTunerIn                        EQU        6
  2216. ;  Video Digitizer PlayThru States 
  2217.  
  2218. vdPlayThruOff                    EQU        0
  2219. vdPlayThruOn                    EQU        1
  2220. ;  Input Color Space Modes 
  2221.  
  2222. vdDigitizerBW                    EQU        0                    ; black and white 
  2223. vdDigitizerRGB                    EQU        1                    ; rgb color 
  2224. ;  Phase Lock Loop Modes 
  2225.  
  2226. vdBroadcastMode                    EQU        0                    ; Broadcast / Laser Disk video mode 
  2227. vdVTRMode                        EQU        1                    ; VCR / Magnetic media mode 
  2228. ;  Field Select Options 
  2229.  
  2230. vdUseAnyField                    EQU        0                    ; Digitizers choice on field use 
  2231. vdUseOddField                    EQU        1                    ; Use odd field for half size vert and smaller 
  2232. vdUseEvenField                    EQU        2                    ; Use even field for half size vert and smaller 
  2233. ;  vdig types 
  2234.  
  2235. vdTypeBasic                        EQU        0                    ; basic, no clipping 
  2236. vdTypeAlpha                        EQU        1                    ; supports clipping with alpha channel 
  2237. vdTypeMask                        EQU        2                    ; supports clipping with mask plane 
  2238. vdTypeKey                        EQU        3                    ; supports clipping with key color(s) 
  2239. ;  Digitizer Input Capability/Current Flags    
  2240.  
  2241. digiInDoesNTSC                    EQU        $00000001            ; digitizer supports NTSC input format 
  2242. digiInDoesPAL                    EQU        $00000002            ; digitizer supports PAL input format 
  2243. digiInDoesSECAM                    EQU        $00000004            ; digitizer supports SECAM input format 
  2244. digiInDoesGenLock                EQU        $00000080            ; digitizer does genlock 
  2245. digiInDoesComposite                EQU        $00000100            ; digitizer supports composite input type 
  2246. digiInDoesSVideo                EQU        $00000200            ; digitizer supports S-Video input type 
  2247. digiInDoesComponent                EQU        $00000400            ; digitizer supports component = rgb, input type 
  2248. digiInVTR_Broadcast                EQU        $00000800            ; digitizer can differentiate between the two 
  2249. digiInDoesColor                    EQU        $00001000            ; digitizer supports color 
  2250. digiInDoesBW                    EQU        $00002000            ; digitizer supports black & white 
  2251.                                                             ; Digitizer Input Current Flags = these are valid only during active operating conditions,    
  2252. digiInSignalLock                EQU        $80000000            ; digitizer detects input signal is locked, this bit = horiz lock || vertical lock 
  2253. ;  Digitizer Output Capability/Current Flags 
  2254.  
  2255. digiOutDoes1                    EQU        $00000001            ; digitizer supports 1 bit pixels 
  2256. digiOutDoes2                    EQU        $00000002            ; digitizer supports 2 bit pixels 
  2257. digiOutDoes4                    EQU        $00000004            ; digitizer supports 4 bit pixels 
  2258. digiOutDoes8                    EQU        $00000008            ; digitizer supports 8 bit pixels 
  2259. digiOutDoes16                    EQU        $00000010            ; digitizer supports 16 bit pixels 
  2260. digiOutDoes32                    EQU        $00000020            ; digitizer supports 32 bit pixels 
  2261. digiOutDoesDither                EQU        $00000040            ; digitizer dithers in indexed modes 
  2262. digiOutDoesStretch                EQU        $00000080            ; digitizer can arbitrarily stretch 
  2263. digiOutDoesShrink                EQU        $00000100            ; digitizer can arbitrarily shrink 
  2264. digiOutDoesMask                    EQU        $00000200            ; digitizer can mask to clipping regions 
  2265. digiOutDoesDouble                EQU        $00000800            ; digitizer can stretch to exactly double size 
  2266. digiOutDoesQuad                    EQU        $00001000            ; digitizer can stretch exactly quadruple size 
  2267. digiOutDoesQuarter                EQU        $00002000            ; digitizer can shrink to exactly quarter size 
  2268. digiOutDoesSixteenth            EQU        $00004000            ; digitizer can shrink to exactly sixteenth size 
  2269. digiOutDoesRotate                EQU        $00008000            ; digitizer supports rotate transformations 
  2270. digiOutDoesHorizFlip            EQU        $00010000            ; digitizer supports horizontal flips Sx < 0 
  2271. digiOutDoesVertFlip                EQU        $00020000            ; digitizer supports vertical flips Sy < 0 
  2272. digiOutDoesSkew                    EQU        $00040000            ; digitizer supports skew = shear,twist, 
  2273. digiOutDoesBlend                EQU        $00080000
  2274. digiOutDoesWarp                    EQU        $00100000
  2275. digiOutDoesHW_DMA                EQU        $00200000            ; digitizer not constrained to local device 
  2276. digiOutDoesHWPlayThru            EQU        $00400000            ; digitizer doesn't need time to play thru 
  2277. digiOutDoesILUT                    EQU        $00800000            ; digitizer does inverse LUT for index modes 
  2278. digiOutDoesKeyColor                EQU        $01000000            ; digitizer does key color functions too 
  2279. digiOutDoesAsyncGrabs            EQU        $02000000            ; digitizer supports async grabs 
  2280. digiOutDoesUnreadableScreenBits    EQU        $04000000            ; playthru doesn't generate readable bits on screen
  2281. digiOutDoesCompress                EQU        $08000000            ; supports alternate output data types 
  2282. digiOutDoesCompressOnly            EQU        $10000000            ; can't provide raw frames anywhere 
  2283. digiOutDoesPlayThruDuringCompress EQU    $20000000            ; digi can do playthru while providing compressed data 
  2284. digiOutDoesCompressPartiallyVisible EQU    $40000000            ; digi doesn't need all bits visible on screen to do hardware compress 
  2285. ;  Types 
  2286. ; typedef ComponentInstance             VideoDigitizerComponent
  2287.  
  2288. ; typedef ComponentResult                 VideoDigitizerError
  2289.  
  2290. DigitizerInfo            RECORD 0
  2291. vdigType                 ds.w    1                ; offset: $0 (0)
  2292. inputCapabilityFlags     ds.l    1                ; offset: $2 (2)
  2293. outputCapabilityFlags     ds.l    1                ; offset: $6 (6)
  2294. inputCurrentFlags         ds.l    1                ; offset: $A (10)
  2295. outputCurrentFlags         ds.l    1                ; offset: $E (14)
  2296. slot                     ds.w    1                ; offset: $12 (18)        ;  temporary for connection purposes 
  2297. gdh                         ds.l    1                ; offset: $14 (20)        ;  temporary for digitizers that have preferred screen 
  2298. maskgdh                     ds.l    1                ; offset: $18 (24)        ;  temporary for digitizers that have mask planes 
  2299. minDestHeight             ds.w    1                ; offset: $1C (28)        ;  Smallest resizable height 
  2300. minDestWidth             ds.w    1                ; offset: $1E (30)        ;  Smallest resizable width 
  2301. maxDestHeight             ds.w    1                ; offset: $20 (32)        ;  Largest resizable height 
  2302. maxDestWidth             ds.w    1                ; offset: $22 (34)        ;  Largest resizable height 
  2303. blendLevels                 ds.w    1                ; offset: $24 (36)        ;  Number of blend levels supported (2 if 1 bit mask) 
  2304. reserved                 ds.l    1                ; offset: $26 (38)        ;  reserved 
  2305. sizeof                     EQU *                    ; size:   $2A (42)
  2306.                         ENDR
  2307. VdigType                RECORD 0
  2308. digType                     ds.l    1                ; offset: $0 (0)
  2309. reserved                 ds.l    1                ; offset: $4 (4)
  2310. sizeof                     EQU *                    ; size:   $8 (8)
  2311.                         ENDR
  2312. VdigTypeList            RECORD 0
  2313. count                     ds.w    1                ; offset: $0 (0)
  2314. list                     ds        VdigType        ; offset: $2 (2) <-- really an array of length one
  2315. sizeof                     EQU *                    ; size:   $A (10)
  2316.                         ENDR
  2317. VdigBufferRec            RECORD 0
  2318. dest                     ds.l    1                ; offset: $0 (0)
  2319. location                 ds        Point            ; offset: $4 (4)
  2320. reserved                 ds.l    1                ; offset: $8 (8)
  2321. sizeof                     EQU *                    ; size:   $C (12)
  2322.                         ENDR
  2323. VdigBufferRecList        RECORD 0
  2324. count                     ds.w    1                ; offset: $0 (0)
  2325. matrix                     ds.l    1                ; offset: $2 (2)
  2326. mask                     ds.l    1                ; offset: $6 (6)
  2327. list                     ds        VdigBufferRec    ; offset: $A (10) <-- really an array of length one
  2328. sizeof                     EQU *                    ; size:   $16 (22)
  2329.                         ENDR
  2330. ; typedef struct VdigBufferRecList *    VdigBufferRecListPtr
  2331.  
  2332. ; typedef VdigBufferRecListPtr *        VdigBufferRecListHandle
  2333.  
  2334. VDCompressionList        RECORD 0
  2335. codec                     ds.l    1                ; offset: $0 (0)
  2336. cType                     ds.l    1                ; offset: $4 (4)
  2337. typeName                 ds        Str63            ; offset: $8 (8)
  2338. name                     ds        Str63            ; offset: $48 (72)
  2339. formatFlags                 ds.l    1                ; offset: $88 (136)
  2340. compressFlags             ds.l    1                ; offset: $8C (140)
  2341. reserved                 ds.l    1                ; offset: $90 (144)
  2342. sizeof                     EQU *                    ; size:   $94 (148)
  2343.                         ENDR
  2344. ; typedef struct VDCompressionList *    VDCompressionListPtr
  2345.  
  2346. ; typedef VDCompressionListPtr *        VDCompressionListHandle
  2347.  
  2348.  
  2349. dmaDepth1                        EQU        1
  2350. dmaDepth2                        EQU        2
  2351. dmaDepth4                        EQU        4
  2352. dmaDepth8                        EQU        8
  2353. dmaDepth16                        EQU        16
  2354. dmaDepth32                        EQU        32
  2355. dmaDepth2Gray                    EQU        64
  2356. dmaDepth4Gray                    EQU        128
  2357. dmaDepth8Gray                    EQU        256
  2358.  
  2359. kVDIGControlledFrameRate        EQU        -1
  2360. ;
  2361. ; pascal VideoDigitizerError VDGetMaxSrcRect(VideoDigitizerComponent ci, short inputStd, Rect *maxSrcRect)
  2362. ;
  2363.     IF ¬ GENERATINGCFM THEN
  2364.         Macro
  2365.         _VDGetMaxSrcRect
  2366.             dc.w                $2F3C
  2367.             dc.w                $0006
  2368.             dc.w                $0001
  2369.             moveq               #0,d0
  2370.             dc.w                $A82A
  2371.         EndM
  2372.     ELSE
  2373.         IMPORT_CFM_FUNCTION VDGetMaxSrcRect
  2374.     ENDIF
  2375.  
  2376. ;
  2377. ; pascal VideoDigitizerError VDGetActiveSrcRect(VideoDigitizerComponent ci, short inputStd, Rect *activeSrcRect)
  2378. ;
  2379.     IF ¬ GENERATINGCFM THEN
  2380.         Macro
  2381.         _VDGetActiveSrcRect
  2382.             dc.w                $2F3C
  2383.             dc.w                $0006
  2384.             dc.w                $0002
  2385.             moveq               #0,d0
  2386.             dc.w                $A82A
  2387.         EndM
  2388.     ELSE
  2389.         IMPORT_CFM_FUNCTION VDGetActiveSrcRect
  2390.     ENDIF
  2391.  
  2392. ;
  2393. ; pascal VideoDigitizerError VDSetDigitizerRect(VideoDigitizerComponent ci, Rect *digitizerRect)
  2394. ;
  2395.     IF ¬ GENERATINGCFM THEN
  2396.         Macro
  2397.         _VDSetDigitizerRect
  2398.             dc.w                $2F3C
  2399.             dc.w                $0004
  2400.             dc.w                $0003
  2401.             moveq               #0,d0
  2402.             dc.w                $A82A
  2403.         EndM
  2404.     ELSE
  2405.         IMPORT_CFM_FUNCTION VDSetDigitizerRect
  2406.     ENDIF
  2407.  
  2408. ;
  2409. ; pascal VideoDigitizerError VDGetDigitizerRect(VideoDigitizerComponent ci, Rect *digitizerRect)
  2410. ;
  2411.     IF ¬ GENERATINGCFM THEN
  2412.         Macro
  2413.         _VDGetDigitizerRect
  2414.             dc.w                $2F3C
  2415.             dc.w                $0004
  2416.             dc.w                $0004
  2417.             moveq               #0,d0
  2418.             dc.w                $A82A
  2419.         EndM
  2420.     ELSE
  2421.         IMPORT_CFM_FUNCTION VDGetDigitizerRect
  2422.     ENDIF
  2423.  
  2424. ;
  2425. ; pascal VideoDigitizerError VDGetVBlankRect(VideoDigitizerComponent ci, short inputStd, Rect *vBlankRect)
  2426. ;
  2427.     IF ¬ GENERATINGCFM THEN
  2428.         Macro
  2429.         _VDGetVBlankRect
  2430.             dc.w                $2F3C
  2431.             dc.w                $0006
  2432.             dc.w                $0005
  2433.             moveq               #0,d0
  2434.             dc.w                $A82A
  2435.         EndM
  2436.     ELSE
  2437.         IMPORT_CFM_FUNCTION VDGetVBlankRect
  2438.     ENDIF
  2439.  
  2440. ;
  2441. ; pascal VideoDigitizerError VDGetMaskPixMap(VideoDigitizerComponent ci, PixMapHandle maskPixMap)
  2442. ;
  2443.     IF ¬ GENERATINGCFM THEN
  2444.         Macro
  2445.         _VDGetMaskPixMap
  2446.             dc.w                $2F3C
  2447.             dc.w                $0004
  2448.             dc.w                $0006
  2449.             moveq               #0,d0
  2450.             dc.w                $A82A
  2451.         EndM
  2452.     ELSE
  2453.         IMPORT_CFM_FUNCTION VDGetMaskPixMap
  2454.     ENDIF
  2455.  
  2456. ;
  2457. ; pascal VideoDigitizerError VDGetPlayThruDestination(VideoDigitizerComponent ci, PixMapHandle *dest, Rect *destRect, MatrixRecord *m, RgnHandle *mask)
  2458. ;
  2459.     IF ¬ GENERATINGCFM THEN
  2460.         Macro
  2461.         _VDGetPlayThruDestination
  2462.             dc.w                $2F3C
  2463.             dc.w                $0010
  2464.             dc.w                $0008
  2465.             moveq               #0,d0
  2466.             dc.w                $A82A
  2467.         EndM
  2468.     ELSE
  2469.         IMPORT_CFM_FUNCTION VDGetPlayThruDestination
  2470.     ENDIF
  2471.  
  2472. ;
  2473. ; pascal VideoDigitizerError VDUseThisCLUT(VideoDigitizerComponent ci, CTabHandle colorTableHandle)
  2474. ;
  2475.     IF ¬ GENERATINGCFM THEN
  2476.         Macro
  2477.         _VDUseThisCLUT
  2478.             dc.w                $2F3C
  2479.             dc.w                $0004
  2480.             dc.w                $0009
  2481.             moveq               #0,d0
  2482.             dc.w                $A82A
  2483.         EndM
  2484.     ELSE
  2485.         IMPORT_CFM_FUNCTION VDUseThisCLUT
  2486.     ENDIF
  2487.  
  2488. ;
  2489. ; pascal VideoDigitizerError VDSetInputGammaValue(VideoDigitizerComponent ci, Fixed channel1, Fixed channel2, Fixed channel3)
  2490. ;
  2491.     IF ¬ GENERATINGCFM THEN
  2492.         Macro
  2493.         _VDSetInputGammaValue
  2494.             dc.w                $2F3C
  2495.             dc.w                $000C
  2496.             dc.w                $000A
  2497.             moveq               #0,d0
  2498.             dc.w                $A82A
  2499.         EndM
  2500.     ELSE
  2501.         IMPORT_CFM_FUNCTION VDSetInputGammaValue
  2502.     ENDIF
  2503.  
  2504. ;
  2505. ; pascal VideoDigitizerError VDGetInputGammaValue(VideoDigitizerComponent ci, Fixed *channel1, Fixed *channel2, Fixed *channel3)
  2506. ;
  2507.     IF ¬ GENERATINGCFM THEN
  2508.         Macro
  2509.         _VDGetInputGammaValue
  2510.             dc.w                $2F3C
  2511.             dc.w                $000C
  2512.             dc.w                $000B
  2513.             moveq               #0,d0
  2514.             dc.w                $A82A
  2515.         EndM
  2516.     ELSE
  2517.         IMPORT_CFM_FUNCTION VDGetInputGammaValue
  2518.     ENDIF
  2519.  
  2520. ;
  2521. ; pascal VideoDigitizerError VDSetBrightness(VideoDigitizerComponent ci, unsigned short *brightness)
  2522. ;
  2523.     IF ¬ GENERATINGCFM THEN
  2524.         Macro
  2525.         _VDSetBrightness
  2526.             dc.w                $2F3C
  2527.             dc.w                $0004
  2528.             dc.w                $000C
  2529.             moveq               #0,d0
  2530.             dc.w                $A82A
  2531.         EndM
  2532.     ELSE
  2533.         IMPORT_CFM_FUNCTION VDSetBrightness
  2534.     ENDIF
  2535.  
  2536. ;
  2537. ; pascal VideoDigitizerError VDGetBrightness(VideoDigitizerComponent ci, unsigned short *brightness)
  2538. ;
  2539.     IF ¬ GENERATINGCFM THEN
  2540.         Macro
  2541.         _VDGetBrightness
  2542.             dc.w                $2F3C
  2543.             dc.w                $0004
  2544.             dc.w                $000D
  2545.             moveq               #0,d0
  2546.             dc.w                $A82A
  2547.         EndM
  2548.     ELSE
  2549.         IMPORT_CFM_FUNCTION VDGetBrightness
  2550.     ENDIF
  2551.  
  2552. ;
  2553. ; pascal VideoDigitizerError VDSetContrast(VideoDigitizerComponent ci, unsigned short *contrast)
  2554. ;
  2555.     IF ¬ GENERATINGCFM THEN
  2556.         Macro
  2557.         _VDSetContrast
  2558.             dc.w                $2F3C
  2559.             dc.w                $0004
  2560.             dc.w                $000E
  2561.             moveq               #0,d0
  2562.             dc.w                $A82A
  2563.         EndM
  2564.     ELSE
  2565.         IMPORT_CFM_FUNCTION VDSetContrast
  2566.     ENDIF
  2567.  
  2568. ;
  2569. ; pascal VideoDigitizerError VDSetHue(VideoDigitizerComponent ci, unsigned short *hue)
  2570. ;
  2571.     IF ¬ GENERATINGCFM THEN
  2572.         Macro
  2573.         _VDSetHue
  2574.             dc.w                $2F3C
  2575.             dc.w                $0004
  2576.             dc.w                $000F
  2577.             moveq               #0,d0
  2578.             dc.w                $A82A
  2579.         EndM
  2580.     ELSE
  2581.         IMPORT_CFM_FUNCTION VDSetHue
  2582.     ENDIF
  2583.  
  2584. ;
  2585. ; pascal VideoDigitizerError VDSetSharpness(VideoDigitizerComponent ci, unsigned short *sharpness)
  2586. ;
  2587.     IF ¬ GENERATINGCFM THEN
  2588.         Macro
  2589.         _VDSetSharpness
  2590.             dc.w                $2F3C
  2591.             dc.w                $0004
  2592.             dc.w                $0010
  2593.             moveq               #0,d0
  2594.             dc.w                $A82A
  2595.         EndM
  2596.     ELSE
  2597.         IMPORT_CFM_FUNCTION VDSetSharpness
  2598.     ENDIF
  2599.  
  2600. ;
  2601. ; pascal VideoDigitizerError VDSetSaturation(VideoDigitizerComponent ci, unsigned short *saturation)
  2602. ;
  2603.     IF ¬ GENERATINGCFM THEN
  2604.         Macro
  2605.         _VDSetSaturation
  2606.             dc.w                $2F3C
  2607.             dc.w                $0004
  2608.             dc.w                $0011
  2609.             moveq               #0,d0
  2610.             dc.w                $A82A
  2611.         EndM
  2612.     ELSE
  2613.         IMPORT_CFM_FUNCTION VDSetSaturation
  2614.     ENDIF
  2615.  
  2616. ;
  2617. ; pascal VideoDigitizerError VDGetContrast(VideoDigitizerComponent ci, unsigned short *contrast)
  2618. ;
  2619.     IF ¬ GENERATINGCFM THEN
  2620.         Macro
  2621.         _VDGetContrast
  2622.             dc.w                $2F3C
  2623.             dc.w                $0004
  2624.             dc.w                $0012
  2625.             moveq               #0,d0
  2626.             dc.w                $A82A
  2627.         EndM
  2628.     ELSE
  2629.         IMPORT_CFM_FUNCTION VDGetContrast
  2630.     ENDIF
  2631.  
  2632. ;
  2633. ; pascal VideoDigitizerError VDGetHue(VideoDigitizerComponent ci, unsigned short *hue)
  2634. ;
  2635.     IF ¬ GENERATINGCFM THEN
  2636.         Macro
  2637.         _VDGetHue
  2638.             dc.w                $2F3C
  2639.             dc.w                $0004
  2640.             dc.w                $0013
  2641.             moveq               #0,d0
  2642.             dc.w                $A82A
  2643.         EndM
  2644.     ELSE
  2645.         IMPORT_CFM_FUNCTION VDGetHue
  2646.     ENDIF
  2647.  
  2648. ;
  2649. ; pascal VideoDigitizerError VDGetSharpness(VideoDigitizerComponent ci, unsigned short *sharpness)
  2650. ;
  2651.     IF ¬ GENERATINGCFM THEN
  2652.         Macro
  2653.         _VDGetSharpness
  2654.             dc.w                $2F3C
  2655.             dc.w                $0004
  2656.             dc.w                $0014
  2657.             moveq               #0,d0
  2658.             dc.w                $A82A
  2659.         EndM
  2660.     ELSE
  2661.         IMPORT_CFM_FUNCTION VDGetSharpness
  2662.     ENDIF
  2663.  
  2664. ;
  2665. ; pascal VideoDigitizerError VDGetSaturation(VideoDigitizerComponent ci, unsigned short *saturation)
  2666. ;
  2667.     IF ¬ GENERATINGCFM THEN
  2668.         Macro
  2669.         _VDGetSaturation
  2670.             dc.w                $2F3C
  2671.             dc.w                $0004
  2672.             dc.w                $0015
  2673.             moveq               #0,d0
  2674.             dc.w                $A82A
  2675.         EndM
  2676.     ELSE
  2677.         IMPORT_CFM_FUNCTION VDGetSaturation
  2678.     ENDIF
  2679.  
  2680. ;
  2681. ; pascal VideoDigitizerError VDGrabOneFrame(VideoDigitizerComponent ci)
  2682. ;
  2683.     IF ¬ GENERATINGCFM THEN
  2684.         Macro
  2685.         _VDGrabOneFrame
  2686.             dc.w                $2F3C
  2687.             dc.w                $0000
  2688.             dc.w                $0016
  2689.             moveq               #0,d0
  2690.             dc.w                $A82A
  2691.         EndM
  2692.     ELSE
  2693.         IMPORT_CFM_FUNCTION VDGrabOneFrame
  2694.     ENDIF
  2695.  
  2696. ;
  2697. ; pascal VideoDigitizerError VDGetMaxAuxBuffer(VideoDigitizerComponent ci, PixMapHandle *pm, Rect *r)
  2698. ;
  2699.     IF ¬ GENERATINGCFM THEN
  2700.         Macro
  2701.         _VDGetMaxAuxBuffer
  2702.             dc.w                $2F3C
  2703.             dc.w                $0008
  2704.             dc.w                $0017
  2705.             moveq               #0,d0
  2706.             dc.w                $A82A
  2707.         EndM
  2708.     ELSE
  2709.         IMPORT_CFM_FUNCTION VDGetMaxAuxBuffer
  2710.     ENDIF
  2711.  
  2712. ;
  2713. ; pascal VideoDigitizerError VDGetDigitizerInfo(VideoDigitizerComponent ci, DigitizerInfo *info)
  2714. ;
  2715.     IF ¬ GENERATINGCFM THEN
  2716.         Macro
  2717.         _VDGetDigitizerInfo
  2718.             dc.w                $2F3C
  2719.             dc.w                $0004
  2720.             dc.w                $0019
  2721.             moveq               #0,d0
  2722.             dc.w                $A82A
  2723.         EndM
  2724.     ELSE
  2725.         IMPORT_CFM_FUNCTION VDGetDigitizerInfo
  2726.     ENDIF
  2727.  
  2728. ;
  2729. ; pascal VideoDigitizerError VDGetCurrentFlags(VideoDigitizerComponent ci, long *inputCurrentFlag, long *outputCurrentFlag)
  2730. ;
  2731.     IF ¬ GENERATINGCFM THEN
  2732.         Macro
  2733.         _VDGetCurrentFlags
  2734.             dc.w                $2F3C
  2735.             dc.w                $0008
  2736.             dc.w                $001A
  2737.             moveq               #0,d0
  2738.             dc.w                $A82A
  2739.         EndM
  2740.     ELSE
  2741.         IMPORT_CFM_FUNCTION VDGetCurrentFlags
  2742.     ENDIF
  2743.  
  2744. ;
  2745. ; pascal VideoDigitizerError VDSetKeyColor(VideoDigitizerComponent ci, long index)
  2746. ;
  2747.     IF ¬ GENERATINGCFM THEN
  2748.         Macro
  2749.         _VDSetKeyColor
  2750.             dc.w                $2F3C
  2751.             dc.w                $0004
  2752.             dc.w                $001B
  2753.             moveq               #0,d0
  2754.             dc.w                $A82A
  2755.         EndM
  2756.     ELSE
  2757.         IMPORT_CFM_FUNCTION VDSetKeyColor
  2758.     ENDIF
  2759.  
  2760. ;
  2761. ; pascal VideoDigitizerError VDGetKeyColor(VideoDigitizerComponent ci, long *index)
  2762. ;
  2763.     IF ¬ GENERATINGCFM THEN
  2764.         Macro
  2765.         _VDGetKeyColor
  2766.             dc.w                $2F3C
  2767.             dc.w                $0004
  2768.             dc.w                $001C
  2769.             moveq               #0,d0
  2770.             dc.w                $A82A
  2771.         EndM
  2772.     ELSE
  2773.         IMPORT_CFM_FUNCTION VDGetKeyColor
  2774.     ENDIF
  2775.  
  2776. ;
  2777. ; pascal VideoDigitizerError VDAddKeyColor(VideoDigitizerComponent ci, long *index)
  2778. ;
  2779.     IF ¬ GENERATINGCFM THEN
  2780.         Macro
  2781.         _VDAddKeyColor
  2782.             dc.w                $2F3C
  2783.             dc.w                $0004
  2784.             dc.w                $001D
  2785.             moveq               #0,d0
  2786.             dc.w                $A82A
  2787.         EndM
  2788.     ELSE
  2789.         IMPORT_CFM_FUNCTION VDAddKeyColor
  2790.     ENDIF
  2791.  
  2792. ;
  2793. ; pascal VideoDigitizerError VDGetNextKeyColor(VideoDigitizerComponent ci, long index)
  2794. ;
  2795.     IF ¬ GENERATINGCFM THEN
  2796.         Macro
  2797.         _VDGetNextKeyColor
  2798.             dc.w                $2F3C
  2799.             dc.w                $0004
  2800.             dc.w                $001E
  2801.             moveq               #0,d0
  2802.             dc.w                $A82A
  2803.         EndM
  2804.     ELSE
  2805.         IMPORT_CFM_FUNCTION VDGetNextKeyColor
  2806.     ENDIF
  2807.  
  2808. ;
  2809. ; pascal VideoDigitizerError VDSetKeyColorRange(VideoDigitizerComponent ci, RGBColor *minRGB, RGBColor *maxRGB)
  2810. ;
  2811.     IF ¬ GENERATINGCFM THEN
  2812.         Macro
  2813.         _VDSetKeyColorRange
  2814.             dc.w                $2F3C
  2815.             dc.w                $0008
  2816.             dc.w                $001F
  2817.             moveq               #0,d0
  2818.             dc.w                $A82A
  2819.         EndM
  2820.     ELSE
  2821.         IMPORT_CFM_FUNCTION VDSetKeyColorRange
  2822.     ENDIF
  2823.  
  2824. ;
  2825. ; pascal VideoDigitizerError VDGetKeyColorRange(VideoDigitizerComponent ci, RGBColor *minRGB, RGBColor *maxRGB)
  2826. ;
  2827.     IF ¬ GENERATINGCFM THEN
  2828.         Macro
  2829.         _VDGetKeyColorRange
  2830.             dc.w                $2F3C
  2831.             dc.w                $0008
  2832.             dc.w                $0020
  2833.             moveq               #0,d0
  2834.             dc.w                $A82A
  2835.         EndM
  2836.     ELSE
  2837.         IMPORT_CFM_FUNCTION VDGetKeyColorRange
  2838.     ENDIF
  2839.  
  2840. ;
  2841. ; pascal VideoDigitizerError VDSetDigitizerUserInterrupt(VideoDigitizerComponent ci, long flags, VdigIntUPP userInterruptProc, long refcon)
  2842. ;
  2843.     IF ¬ GENERATINGCFM THEN
  2844.         Macro
  2845.         _VDSetDigitizerUserInterrupt
  2846.             dc.w                $2F3C
  2847.             dc.w                $000C
  2848.             dc.w                $0021
  2849.             moveq               #0,d0
  2850.             dc.w                $A82A
  2851.         EndM
  2852.     ELSE
  2853.         IMPORT_CFM_FUNCTION VDSetDigitizerUserInterrupt
  2854.     ENDIF
  2855.  
  2856. ;
  2857. ; pascal VideoDigitizerError VDSetInputColorSpaceMode(VideoDigitizerComponent ci, short colorSpaceMode)
  2858. ;
  2859.     IF ¬ GENERATINGCFM THEN
  2860.         Macro
  2861.         _VDSetInputColorSpaceMode
  2862.             dc.w                $2F3C
  2863.             dc.w                $0002
  2864.             dc.w                $0022
  2865.             moveq               #0,d0
  2866.             dc.w                $A82A
  2867.         EndM
  2868.     ELSE
  2869.         IMPORT_CFM_FUNCTION VDSetInputColorSpaceMode
  2870.     ENDIF
  2871.  
  2872. ;
  2873. ; pascal VideoDigitizerError VDGetInputColorSpaceMode(VideoDigitizerComponent ci, short *colorSpaceMode)
  2874. ;
  2875.     IF ¬ GENERATINGCFM THEN
  2876.         Macro
  2877.         _VDGetInputColorSpaceMode
  2878.             dc.w                $2F3C
  2879.             dc.w                $0004
  2880.             dc.w                $0023
  2881.             moveq               #0,d0
  2882.             dc.w                $A82A
  2883.         EndM
  2884.     ELSE
  2885.         IMPORT_CFM_FUNCTION VDGetInputColorSpaceMode
  2886.     ENDIF
  2887.  
  2888. ;
  2889. ; pascal VideoDigitizerError VDSetClipState(VideoDigitizerComponent ci, short clipEnable)
  2890. ;
  2891.     IF ¬ GENERATINGCFM THEN
  2892.         Macro
  2893.         _VDSetClipState
  2894.             dc.w                $2F3C
  2895.             dc.w                $0002
  2896.             dc.w                $0024
  2897.             moveq               #0,d0
  2898.             dc.w                $A82A
  2899.         EndM
  2900.     ELSE
  2901.         IMPORT_CFM_FUNCTION VDSetClipState
  2902.     ENDIF
  2903.  
  2904. ;
  2905. ; pascal VideoDigitizerError VDGetClipState(VideoDigitizerComponent ci, short *clipEnable)
  2906. ;
  2907.     IF ¬ GENERATINGCFM THEN
  2908.         Macro
  2909.         _VDGetClipState
  2910.             dc.w                $2F3C
  2911.             dc.w                $0004
  2912.             dc.w                $0025
  2913.             moveq               #0,d0
  2914.             dc.w                $A82A
  2915.         EndM
  2916.     ELSE
  2917.         IMPORT_CFM_FUNCTION VDGetClipState
  2918.     ENDIF
  2919.  
  2920. ;
  2921. ; pascal VideoDigitizerError VDSetClipRgn(VideoDigitizerComponent ci, RgnHandle clipRegion)
  2922. ;
  2923.     IF ¬ GENERATINGCFM THEN
  2924.         Macro
  2925.         _VDSetClipRgn
  2926.             dc.w                $2F3C
  2927.             dc.w                $0004
  2928.             dc.w                $0026
  2929.             moveq               #0,d0
  2930.             dc.w                $A82A
  2931.         EndM
  2932.     ELSE
  2933.         IMPORT_CFM_FUNCTION VDSetClipRgn
  2934.     ENDIF
  2935.  
  2936. ;
  2937. ; pascal VideoDigitizerError VDClearClipRgn(VideoDigitizerComponent ci, RgnHandle clipRegion)
  2938. ;
  2939.     IF ¬ GENERATINGCFM THEN
  2940.         Macro
  2941.         _VDClearClipRgn
  2942.             dc.w                $2F3C
  2943.             dc.w                $0004
  2944.             dc.w                $0027
  2945.             moveq               #0,d0
  2946.             dc.w                $A82A
  2947.         EndM
  2948.     ELSE
  2949.         IMPORT_CFM_FUNCTION VDClearClipRgn
  2950.     ENDIF
  2951.  
  2952. ;
  2953. ; pascal VideoDigitizerError VDGetCLUTInUse(VideoDigitizerComponent ci, CTabHandle *colorTableHandle)
  2954. ;
  2955.     IF ¬ GENERATINGCFM THEN
  2956.         Macro
  2957.         _VDGetCLUTInUse
  2958.             dc.w                $2F3C
  2959.             dc.w                $0004
  2960.             dc.w                $0028
  2961.             moveq               #0,d0
  2962.             dc.w                $A82A
  2963.         EndM
  2964.     ELSE
  2965.         IMPORT_CFM_FUNCTION VDGetCLUTInUse
  2966.     ENDIF
  2967.  
  2968. ;
  2969. ; pascal VideoDigitizerError VDSetPLLFilterType(VideoDigitizerComponent ci, short pllType)
  2970. ;
  2971.     IF ¬ GENERATINGCFM THEN
  2972.         Macro
  2973.         _VDSetPLLFilterType
  2974.             dc.w                $2F3C
  2975.             dc.w                $0002
  2976.             dc.w                $0029
  2977.             moveq               #0,d0
  2978.             dc.w                $A82A
  2979.         EndM
  2980.     ELSE
  2981.         IMPORT_CFM_FUNCTION VDSetPLLFilterType
  2982.     ENDIF
  2983.  
  2984. ;
  2985. ; pascal VideoDigitizerError VDGetPLLFilterType(VideoDigitizerComponent ci, short *pllType)
  2986. ;
  2987.     IF ¬ GENERATINGCFM THEN
  2988.         Macro
  2989.         _VDGetPLLFilterType
  2990.             dc.w                $2F3C
  2991.             dc.w                $0004
  2992.             dc.w                $002A
  2993.             moveq               #0,d0
  2994.             dc.w                $A82A
  2995.         EndM
  2996.     ELSE
  2997.         IMPORT_CFM_FUNCTION VDGetPLLFilterType
  2998.     ENDIF
  2999.  
  3000. ;
  3001. ; pascal VideoDigitizerError VDGetMaskandValue(VideoDigitizerComponent ci, unsigned short blendLevel, long *mask, long *value)
  3002. ;
  3003.     IF ¬ GENERATINGCFM THEN
  3004.         Macro
  3005.         _VDGetMaskandValue
  3006.             dc.w                $2F3C
  3007.             dc.w                $000A
  3008.             dc.w                $002B
  3009.             moveq               #0,d0
  3010.             dc.w                $A82A
  3011.         EndM
  3012.     ELSE
  3013.         IMPORT_CFM_FUNCTION VDGetMaskandValue
  3014.     ENDIF
  3015.  
  3016. ;
  3017. ; pascal VideoDigitizerError VDSetMasterBlendLevel(VideoDigitizerComponent ci, unsigned short *blendLevel)
  3018. ;
  3019.     IF ¬ GENERATINGCFM THEN
  3020.         Macro
  3021.         _VDSetMasterBlendLevel
  3022.             dc.w                $2F3C
  3023.             dc.w                $0004
  3024.             dc.w                $002C
  3025.             moveq               #0,d0
  3026.             dc.w                $A82A
  3027.         EndM
  3028.     ELSE
  3029.         IMPORT_CFM_FUNCTION VDSetMasterBlendLevel
  3030.     ENDIF
  3031.  
  3032. ;
  3033. ; pascal VideoDigitizerError VDSetPlayThruDestination(VideoDigitizerComponent ci, PixMapHandle dest, Rect *destRect, MatrixRecord *m, RgnHandle mask)
  3034. ;
  3035.     IF ¬ GENERATINGCFM THEN
  3036.         Macro
  3037.         _VDSetPlayThruDestination
  3038.             dc.w                $2F3C
  3039.             dc.w                $0010
  3040.             dc.w                $002D
  3041.             moveq               #0,d0
  3042.             dc.w                $A82A
  3043.         EndM
  3044.     ELSE
  3045.         IMPORT_CFM_FUNCTION VDSetPlayThruDestination
  3046.     ENDIF
  3047.  
  3048. ;
  3049. ; pascal VideoDigitizerError VDSetPlayThruOnOff(VideoDigitizerComponent ci, short state)
  3050. ;
  3051.     IF ¬ GENERATINGCFM THEN
  3052.         Macro
  3053.         _VDSetPlayThruOnOff
  3054.             dc.w                $2F3C
  3055.             dc.w                $0002
  3056.             dc.w                $002E
  3057.             moveq               #0,d0
  3058.             dc.w                $A82A
  3059.         EndM
  3060.     ELSE
  3061.         IMPORT_CFM_FUNCTION VDSetPlayThruOnOff
  3062.     ENDIF
  3063.  
  3064. ;
  3065. ; pascal VideoDigitizerError VDSetFieldPreference(VideoDigitizerComponent ci, short fieldFlag)
  3066. ;
  3067.     IF ¬ GENERATINGCFM THEN
  3068.         Macro
  3069.         _VDSetFieldPreference
  3070.             dc.w                $2F3C
  3071.             dc.w                $0002
  3072.             dc.w                $002F
  3073.             moveq               #0,d0
  3074.             dc.w                $A82A
  3075.         EndM
  3076.     ELSE
  3077.         IMPORT_CFM_FUNCTION VDSetFieldPreference
  3078.     ENDIF
  3079.  
  3080. ;
  3081. ; pascal VideoDigitizerError VDGetFieldPreference(VideoDigitizerComponent ci, short *fieldFlag)
  3082. ;
  3083.     IF ¬ GENERATINGCFM THEN
  3084.         Macro
  3085.         _VDGetFieldPreference
  3086.             dc.w                $2F3C
  3087.             dc.w                $0004
  3088.             dc.w                $0030
  3089.             moveq               #0,d0
  3090.             dc.w                $A82A
  3091.         EndM
  3092.     ELSE
  3093.         IMPORT_CFM_FUNCTION VDGetFieldPreference
  3094.     ENDIF
  3095.  
  3096. ;
  3097. ; pascal VideoDigitizerError VDPreflightDestination(VideoDigitizerComponent ci, Rect *digitizerRect, PixMap **dest, Rect *destRect, MatrixRecord *m)
  3098. ;
  3099.     IF ¬ GENERATINGCFM THEN
  3100.         Macro
  3101.         _VDPreflightDestination
  3102.             dc.w                $2F3C
  3103.             dc.w                $0010
  3104.             dc.w                $0032
  3105.             moveq               #0,d0
  3106.             dc.w                $A82A
  3107.         EndM
  3108.     ELSE
  3109.         IMPORT_CFM_FUNCTION VDPreflightDestination
  3110.     ENDIF
  3111.  
  3112. ;
  3113. ; pascal VideoDigitizerError VDPreflightGlobalRect(VideoDigitizerComponent ci, GrafPtr theWindow, Rect *globalRect)
  3114. ;
  3115.     IF ¬ GENERATINGCFM THEN
  3116.         Macro
  3117.         _VDPreflightGlobalRect
  3118.             dc.w                $2F3C
  3119.             dc.w                $0008
  3120.             dc.w                $0033
  3121.             moveq               #0,d0
  3122.             dc.w                $A82A
  3123.         EndM
  3124.     ELSE
  3125.         IMPORT_CFM_FUNCTION VDPreflightGlobalRect
  3126.     ENDIF
  3127.  
  3128. ;
  3129. ; pascal VideoDigitizerError VDSetPlayThruGlobalRect(VideoDigitizerComponent ci, GrafPtr theWindow, Rect *globalRect)
  3130. ;
  3131.     IF ¬ GENERATINGCFM THEN
  3132.         Macro
  3133.         _VDSetPlayThruGlobalRect
  3134.             dc.w                $2F3C
  3135.             dc.w                $0008
  3136.             dc.w                $0034
  3137.             moveq               #0,d0
  3138.             dc.w                $A82A
  3139.         EndM
  3140.     ELSE
  3141.         IMPORT_CFM_FUNCTION VDSetPlayThruGlobalRect
  3142.     ENDIF
  3143.  
  3144. ;
  3145. ; pascal VideoDigitizerError VDSetInputGammaRecord(VideoDigitizerComponent ci, VDGamRecPtr inputGammaPtr)
  3146. ;
  3147.     IF ¬ GENERATINGCFM THEN
  3148.         Macro
  3149.         _VDSetInputGammaRecord
  3150.             dc.w                $2F3C
  3151.             dc.w                $0004
  3152.             dc.w                $0035
  3153.             moveq               #0,d0
  3154.             dc.w                $A82A
  3155.         EndM
  3156.     ELSE
  3157.         IMPORT_CFM_FUNCTION VDSetInputGammaRecord
  3158.     ENDIF
  3159.  
  3160. ;
  3161. ; pascal VideoDigitizerError VDGetInputGammaRecord(VideoDigitizerComponent ci, VDGamRecPtr *inputGammaPtr)
  3162. ;
  3163.     IF ¬ GENERATINGCFM THEN
  3164.         Macro
  3165.         _VDGetInputGammaRecord
  3166.             dc.w                $2F3C
  3167.             dc.w                $0004
  3168.             dc.w                $0036
  3169.             moveq               #0,d0
  3170.             dc.w                $A82A
  3171.         EndM
  3172.     ELSE
  3173.         IMPORT_CFM_FUNCTION VDGetInputGammaRecord
  3174.     ENDIF
  3175.  
  3176. ;
  3177. ; pascal VideoDigitizerError VDSetBlackLevelValue(VideoDigitizerComponent ci, unsigned short *blackLevel)
  3178. ;
  3179.     IF ¬ GENERATINGCFM THEN
  3180.         Macro
  3181.         _VDSetBlackLevelValue
  3182.             dc.w                $2F3C
  3183.             dc.w                $0004
  3184.             dc.w                $0037
  3185.             moveq               #0,d0
  3186.             dc.w                $A82A
  3187.         EndM
  3188.     ELSE
  3189.         IMPORT_CFM_FUNCTION VDSetBlackLevelValue
  3190.     ENDIF
  3191.  
  3192. ;
  3193. ; pascal VideoDigitizerError VDGetBlackLevelValue(VideoDigitizerComponent ci, unsigned short *blackLevel)
  3194. ;
  3195.     IF ¬ GENERATINGCFM THEN
  3196.         Macro
  3197.         _VDGetBlackLevelValue
  3198.             dc.w                $2F3C
  3199.             dc.w                $0004
  3200.             dc.w                $0038
  3201.             moveq               #0,d0
  3202.             dc.w                $A82A
  3203.         EndM
  3204.     ELSE
  3205.         IMPORT_CFM_FUNCTION VDGetBlackLevelValue
  3206.     ENDIF
  3207.  
  3208. ;
  3209. ; pascal VideoDigitizerError VDSetWhiteLevelValue(VideoDigitizerComponent ci, unsigned short *whiteLevel)
  3210. ;
  3211.     IF ¬ GENERATINGCFM THEN
  3212.         Macro
  3213.         _VDSetWhiteLevelValue
  3214.             dc.w                $2F3C
  3215.             dc.w                $0004
  3216.             dc.w                $0039
  3217.             moveq               #0,d0
  3218.             dc.w                $A82A
  3219.         EndM
  3220.     ELSE
  3221.         IMPORT_CFM_FUNCTION VDSetWhiteLevelValue
  3222.     ENDIF
  3223.  
  3224. ;
  3225. ; pascal VideoDigitizerError VDGetWhiteLevelValue(VideoDigitizerComponent ci, unsigned short *whiteLevel)
  3226. ;
  3227.     IF ¬ GENERATINGCFM THEN
  3228.         Macro
  3229.         _VDGetWhiteLevelValue
  3230.             dc.w                $2F3C
  3231.             dc.w                $0004
  3232.             dc.w                $003A
  3233.             moveq               #0,d0
  3234.             dc.w                $A82A
  3235.         EndM
  3236.     ELSE
  3237.         IMPORT_CFM_FUNCTION VDGetWhiteLevelValue
  3238.     ENDIF
  3239.  
  3240. ;
  3241. ; pascal VideoDigitizerError VDGetVideoDefaults(VideoDigitizerComponent ci, unsigned short *blackLevel, unsigned short *whiteLevel, unsigned short *brightness, unsigned short *hue, unsigned short *saturation, unsigned short *contrast, unsigned short *sharpness)
  3242. ;
  3243.     IF ¬ GENERATINGCFM THEN
  3244.         Macro
  3245.         _VDGetVideoDefaults
  3246.             dc.w                $2F3C
  3247.             dc.w                $001C
  3248.             dc.w                $003B
  3249.             moveq               #0,d0
  3250.             dc.w                $A82A
  3251.         EndM
  3252.     ELSE
  3253.         IMPORT_CFM_FUNCTION VDGetVideoDefaults
  3254.     ENDIF
  3255.  
  3256. ;
  3257. ; pascal VideoDigitizerError VDGetNumberOfInputs(VideoDigitizerComponent ci, short *inputs)
  3258. ;
  3259.     IF ¬ GENERATINGCFM THEN
  3260.         Macro
  3261.         _VDGetNumberOfInputs
  3262.             dc.w                $2F3C
  3263.             dc.w                $0004
  3264.             dc.w                $003C
  3265.             moveq               #0,d0
  3266.             dc.w                $A82A
  3267.         EndM
  3268.     ELSE
  3269.         IMPORT_CFM_FUNCTION VDGetNumberOfInputs
  3270.     ENDIF
  3271.  
  3272. ;
  3273. ; pascal VideoDigitizerError VDGetInputFormat(VideoDigitizerComponent ci, short input, short *format)
  3274. ;
  3275.     IF ¬ GENERATINGCFM THEN
  3276.         Macro
  3277.         _VDGetInputFormat
  3278.             dc.w                $2F3C
  3279.             dc.w                $0006
  3280.             dc.w                $003D
  3281.             moveq               #0,d0
  3282.             dc.w                $A82A
  3283.         EndM
  3284.     ELSE
  3285.         IMPORT_CFM_FUNCTION VDGetInputFormat
  3286.     ENDIF
  3287.  
  3288. ;
  3289. ; pascal VideoDigitizerError VDSetInput(VideoDigitizerComponent ci, short input)
  3290. ;
  3291.     IF ¬ GENERATINGCFM THEN
  3292.         Macro
  3293.         _VDSetInput
  3294.             dc.w                $2F3C
  3295.             dc.w                $0002
  3296.             dc.w                $003E
  3297.             moveq               #0,d0
  3298.             dc.w                $A82A
  3299.         EndM
  3300.     ELSE
  3301.         IMPORT_CFM_FUNCTION VDSetInput
  3302.     ENDIF
  3303.  
  3304. ;
  3305. ; pascal VideoDigitizerError VDGetInput(VideoDigitizerComponent ci, short *input)
  3306. ;
  3307.     IF ¬ GENERATINGCFM THEN
  3308.         Macro
  3309.         _VDGetInput
  3310.             dc.w                $2F3C
  3311.             dc.w                $0004
  3312.             dc.w                $003F
  3313.             moveq               #0,d0
  3314.             dc.w                $A82A
  3315.         EndM
  3316.     ELSE
  3317.         IMPORT_CFM_FUNCTION VDGetInput
  3318.     ENDIF
  3319.  
  3320. ;
  3321. ; pascal VideoDigitizerError VDSetInputStandard(VideoDigitizerComponent ci, short inputStandard)
  3322. ;
  3323.     IF ¬ GENERATINGCFM THEN
  3324.         Macro
  3325.         _VDSetInputStandard
  3326.             dc.w                $2F3C
  3327.             dc.w                $0002
  3328.             dc.w                $0040
  3329.             moveq               #0,d0
  3330.             dc.w                $A82A
  3331.         EndM
  3332.     ELSE
  3333.         IMPORT_CFM_FUNCTION VDSetInputStandard
  3334.     ENDIF
  3335.  
  3336. ;
  3337. ; pascal VideoDigitizerError VDSetupBuffers(VideoDigitizerComponent ci, VdigBufferRecListHandle bufferList)
  3338. ;
  3339.     IF ¬ GENERATINGCFM THEN
  3340.         Macro
  3341.         _VDSetupBuffers
  3342.             dc.w                $2F3C
  3343.             dc.w                $0004
  3344.             dc.w                $0041
  3345.             moveq               #0,d0
  3346.             dc.w                $A82A
  3347.         EndM
  3348.     ELSE
  3349.         IMPORT_CFM_FUNCTION VDSetupBuffers
  3350.     ENDIF
  3351.  
  3352. ;
  3353. ; pascal VideoDigitizerError VDGrabOneFrameAsync(VideoDigitizerComponent ci, short buffer)
  3354. ;
  3355.     IF ¬ GENERATINGCFM THEN
  3356.         Macro
  3357.         _VDGrabOneFrameAsync
  3358.             dc.w                $2F3C
  3359.             dc.w                $0002
  3360.             dc.w                $0042
  3361.             moveq               #0,d0
  3362.             dc.w                $A82A
  3363.         EndM
  3364.     ELSE
  3365.         IMPORT_CFM_FUNCTION VDGrabOneFrameAsync
  3366.     ENDIF
  3367.  
  3368. ;
  3369. ; pascal VideoDigitizerError VDDone(VideoDigitizerComponent ci, short buffer)
  3370. ;
  3371.     IF ¬ GENERATINGCFM THEN
  3372.         Macro
  3373.         _VDDone
  3374.             dc.w                $2F3C
  3375.             dc.w                $0002
  3376.             dc.w                $0043
  3377.             moveq               #0,d0
  3378.             dc.w                $A82A
  3379.         EndM
  3380.     ELSE
  3381.         IMPORT_CFM_FUNCTION VDDone
  3382.     ENDIF
  3383.  
  3384. ;
  3385. ; pascal VideoDigitizerError VDSetCompression(VideoDigitizerComponent ci, OSType compressType, short depth, Rect *bounds, CodecQ spatialQuality, CodecQ temporalQuality, long keyFrameRate)
  3386. ;
  3387.     IF ¬ GENERATINGCFM THEN
  3388.         Macro
  3389.         _VDSetCompression
  3390.             dc.w                $2F3C
  3391.             dc.w                $0016
  3392.             dc.w                $0044
  3393.             moveq               #0,d0
  3394.             dc.w                $A82A
  3395.         EndM
  3396.     ELSE
  3397.         IMPORT_CFM_FUNCTION VDSetCompression
  3398.     ENDIF
  3399.  
  3400. ;
  3401. ; pascal VideoDigitizerError VDCompressOneFrameAsync(VideoDigitizerComponent ci)
  3402. ;
  3403.     IF ¬ GENERATINGCFM THEN
  3404.         Macro
  3405.         _VDCompressOneFrameAsync
  3406.             dc.w                $2F3C
  3407.             dc.w                $0000
  3408.             dc.w                $0045
  3409.             moveq               #0,d0
  3410.             dc.w                $A82A
  3411.         EndM
  3412.     ELSE
  3413.         IMPORT_CFM_FUNCTION VDCompressOneFrameAsync
  3414.     ENDIF
  3415.  
  3416. ;
  3417. ; pascal VideoDigitizerError VDCompressDone(VideoDigitizerComponent ci, Boolean *done, Ptr *theData, long *dataSize, UInt8 *similarity, TimeRecord *t)
  3418. ;
  3419.     IF ¬ GENERATINGCFM THEN
  3420.         Macro
  3421.         _VDCompressDone
  3422.             dc.w                $2F3C
  3423.             dc.w                $0014
  3424.             dc.w                $0046
  3425.             moveq               #0,d0
  3426.             dc.w                $A82A
  3427.         EndM
  3428.     ELSE
  3429.         IMPORT_CFM_FUNCTION VDCompressDone
  3430.     ENDIF
  3431.  
  3432. ;
  3433. ; pascal VideoDigitizerError VDReleaseCompressBuffer(VideoDigitizerComponent ci, Ptr bufferAddr)
  3434. ;
  3435.     IF ¬ GENERATINGCFM THEN
  3436.         Macro
  3437.         _VDReleaseCompressBuffer
  3438.             dc.w                $2F3C
  3439.             dc.w                $0004
  3440.             dc.w                $0047
  3441.             moveq               #0,d0
  3442.             dc.w                $A82A
  3443.         EndM
  3444.     ELSE
  3445.         IMPORT_CFM_FUNCTION VDReleaseCompressBuffer
  3446.     ENDIF
  3447.  
  3448. ;
  3449. ; pascal VideoDigitizerError VDGetImageDescription(VideoDigitizerComponent ci, ImageDescriptionHandle desc)
  3450. ;
  3451.     IF ¬ GENERATINGCFM THEN
  3452.         Macro
  3453.         _VDGetImageDescription
  3454.             dc.w                $2F3C
  3455.             dc.w                $0004
  3456.             dc.w                $0048
  3457.             moveq               #0,d0
  3458.             dc.w                $A82A
  3459.         EndM
  3460.     ELSE
  3461.         IMPORT_CFM_FUNCTION VDGetImageDescription
  3462.     ENDIF
  3463.  
  3464. ;
  3465. ; pascal VideoDigitizerError VDResetCompressSequence(VideoDigitizerComponent ci)
  3466. ;
  3467.     IF ¬ GENERATINGCFM THEN
  3468.         Macro
  3469.         _VDResetCompressSequence
  3470.             dc.w                $2F3C
  3471.             dc.w                $0000
  3472.             dc.w                $0049
  3473.             moveq               #0,d0
  3474.             dc.w                $A82A
  3475.         EndM
  3476.     ELSE
  3477.         IMPORT_CFM_FUNCTION VDResetCompressSequence
  3478.     ENDIF
  3479.  
  3480. ;
  3481. ; pascal VideoDigitizerError VDSetCompressionOnOff(VideoDigitizerComponent ci, Boolean state)
  3482. ;
  3483.     IF ¬ GENERATINGCFM THEN
  3484.         Macro
  3485.         _VDSetCompressionOnOff
  3486.             dc.w                $2F3C
  3487.             dc.w                $0002
  3488.             dc.w                $004A
  3489.             moveq               #0,d0
  3490.             dc.w                $A82A
  3491.         EndM
  3492.     ELSE
  3493.         IMPORT_CFM_FUNCTION VDSetCompressionOnOff
  3494.     ENDIF
  3495.  
  3496. ;
  3497. ; pascal VideoDigitizerError VDGetCompressionTypes(VideoDigitizerComponent ci, VDCompressionListHandle h)
  3498. ;
  3499.     IF ¬ GENERATINGCFM THEN
  3500.         Macro
  3501.         _VDGetCompressionTypes
  3502.             dc.w                $2F3C
  3503.             dc.w                $0004
  3504.             dc.w                $004B
  3505.             moveq               #0,d0
  3506.             dc.w                $A82A
  3507.         EndM
  3508.     ELSE
  3509.         IMPORT_CFM_FUNCTION VDGetCompressionTypes
  3510.     ENDIF
  3511.  
  3512. ;
  3513. ; pascal VideoDigitizerError VDSetTimeBase(VideoDigitizerComponent ci, TimeBase t)
  3514. ;
  3515.     IF ¬ GENERATINGCFM THEN
  3516.         Macro
  3517.         _VDSetTimeBase
  3518.             dc.w                $2F3C
  3519.             dc.w                $0004
  3520.             dc.w                $004C
  3521.             moveq               #0,d0
  3522.             dc.w                $A82A
  3523.         EndM
  3524.     ELSE
  3525.         IMPORT_CFM_FUNCTION VDSetTimeBase
  3526.     ENDIF
  3527.  
  3528. ;
  3529. ; pascal VideoDigitizerError VDSetFrameRate(VideoDigitizerComponent ci, Fixed framesPerSecond)
  3530. ;
  3531.     IF ¬ GENERATINGCFM THEN
  3532.         Macro
  3533.         _VDSetFrameRate
  3534.             dc.w                $2F3C
  3535.             dc.w                $0004
  3536.             dc.w                $004D
  3537.             moveq               #0,d0
  3538.             dc.w                $A82A
  3539.         EndM
  3540.     ELSE
  3541.         IMPORT_CFM_FUNCTION VDSetFrameRate
  3542.     ENDIF
  3543.  
  3544. ;
  3545. ; pascal VideoDigitizerError VDGetDataRate(VideoDigitizerComponent ci, long *milliSecPerFrame, Fixed *framesPerSecond, long *bytesPerSecond)
  3546. ;
  3547.     IF ¬ GENERATINGCFM THEN
  3548.         Macro
  3549.         _VDGetDataRate
  3550.             dc.w                $2F3C
  3551.             dc.w                $000C
  3552.             dc.w                $004E
  3553.             moveq               #0,d0
  3554.             dc.w                $A82A
  3555.         EndM
  3556.     ELSE
  3557.         IMPORT_CFM_FUNCTION VDGetDataRate
  3558.     ENDIF
  3559.  
  3560. ;
  3561. ; pascal VideoDigitizerError VDGetSoundInputDriver(VideoDigitizerComponent ci, Str255 soundDriverName)
  3562. ;
  3563.     IF ¬ GENERATINGCFM THEN
  3564.         Macro
  3565.         _VDGetSoundInputDriver
  3566.             dc.w                $2F3C
  3567.             dc.w                $0004
  3568.             dc.w                $004F
  3569.             moveq               #0,d0
  3570.             dc.w                $A82A
  3571.         EndM
  3572.     ELSE
  3573.         IMPORT_CFM_FUNCTION VDGetSoundInputDriver
  3574.     ENDIF
  3575.  
  3576. ;
  3577. ; pascal VideoDigitizerError VDGetDMADepths(VideoDigitizerComponent ci, long *depthArray, long *preferredDepth)
  3578. ;
  3579.     IF ¬ GENERATINGCFM THEN
  3580.         Macro
  3581.         _VDGetDMADepths
  3582.             dc.w                $2F3C
  3583.             dc.w                $0008
  3584.             dc.w                $0050
  3585.             moveq               #0,d0
  3586.             dc.w                $A82A
  3587.         EndM
  3588.     ELSE
  3589.         IMPORT_CFM_FUNCTION VDGetDMADepths
  3590.     ENDIF
  3591.  
  3592. ;
  3593. ; pascal VideoDigitizerError VDGetPreferredTimeScale(VideoDigitizerComponent ci, TimeScale *preferred)
  3594. ;
  3595.     IF ¬ GENERATINGCFM THEN
  3596.         Macro
  3597.         _VDGetPreferredTimeScale
  3598.             dc.w                $2F3C
  3599.             dc.w                $0004
  3600.             dc.w                $0051
  3601.             moveq               #0,d0
  3602.             dc.w                $A82A
  3603.         EndM
  3604.     ELSE
  3605.         IMPORT_CFM_FUNCTION VDGetPreferredTimeScale
  3606.     ENDIF
  3607.  
  3608. ;
  3609. ; pascal VideoDigitizerError VDReleaseAsyncBuffers(VideoDigitizerComponent ci)
  3610. ;
  3611.     IF ¬ GENERATINGCFM THEN
  3612.         Macro
  3613.         _VDReleaseAsyncBuffers
  3614.             dc.w                $2F3C
  3615.             dc.w                $0000
  3616.             dc.w                $0052
  3617.             moveq               #0,d0
  3618.             dc.w                $A82A
  3619.         EndM
  3620.     ELSE
  3621.         IMPORT_CFM_FUNCTION VDReleaseAsyncBuffers
  3622.     ENDIF
  3623.  
  3624. ;  83 is reserved for compatibility reasons 
  3625. ;
  3626. ; pascal VideoDigitizerError VDSetDataRate(VideoDigitizerComponent ci, long bytesPerSecond)
  3627. ;
  3628.     IF ¬ GENERATINGCFM THEN
  3629.         Macro
  3630.         _VDSetDataRate
  3631.             dc.w                $2F3C
  3632.             dc.w                $0004
  3633.             dc.w                $0054
  3634.             moveq               #0,d0
  3635.             dc.w                $A82A
  3636.         EndM
  3637.     ELSE
  3638.         IMPORT_CFM_FUNCTION VDSetDataRate
  3639.     ENDIF
  3640.  
  3641. ;
  3642. ; pascal VideoDigitizerError VDGetTimeCode(VideoDigitizerComponent ci, TimeRecord *atTime, void *timeCodeFormat, void *timeCodeTime)
  3643. ;
  3644.     IF ¬ GENERATINGCFM THEN
  3645.         Macro
  3646.         _VDGetTimeCode
  3647.             dc.w                $2F3C
  3648.             dc.w                $000C
  3649.             dc.w                $0055
  3650.             moveq               #0,d0
  3651.             dc.w                $A82A
  3652.         EndM
  3653.     ELSE
  3654.         IMPORT_CFM_FUNCTION VDGetTimeCode
  3655.     ENDIF
  3656.  
  3657. ;
  3658. ; pascal VideoDigitizerError VDUseSafeBuffers(VideoDigitizerComponent ci, Boolean useSafeBuffers)
  3659. ;
  3660.     IF ¬ GENERATINGCFM THEN
  3661.         Macro
  3662.         _VDUseSafeBuffers
  3663.             dc.w                $2F3C
  3664.             dc.w                $0002
  3665.             dc.w                $0056
  3666.             moveq               #0,d0
  3667.             dc.w                $A82A
  3668.         EndM
  3669.     ELSE
  3670.         IMPORT_CFM_FUNCTION VDUseSafeBuffers
  3671.     ENDIF
  3672.  
  3673. ;
  3674. ; pascal VideoDigitizerError VDGetSoundInputSource(VideoDigitizerComponent ci, long videoInput, long *soundInput)
  3675. ;
  3676.     IF ¬ GENERATINGCFM THEN
  3677.         Macro
  3678.         _VDGetSoundInputSource
  3679.             dc.w                $2F3C
  3680.             dc.w                $0008
  3681.             dc.w                $0057
  3682.             moveq               #0,d0
  3683.             dc.w                $A82A
  3684.         EndM
  3685.     ELSE
  3686.         IMPORT_CFM_FUNCTION VDGetSoundInputSource
  3687.     ENDIF
  3688.  
  3689. ;
  3690. ; pascal VideoDigitizerError VDGetCompressionTime(VideoDigitizerComponent ci, OSType compressionType, short depth, Rect *srcRect, CodecQ *spatialQuality, CodecQ *temporalQuality, unsigned long *compressTime)
  3691. ;
  3692.     IF ¬ GENERATINGCFM THEN
  3693.         Macro
  3694.         _VDGetCompressionTime
  3695.             dc.w                $2F3C
  3696.             dc.w                $0016
  3697.             dc.w                $0058
  3698.             moveq               #0,d0
  3699.             dc.w                $A82A
  3700.         EndM
  3701.     ELSE
  3702.         IMPORT_CFM_FUNCTION VDGetCompressionTime
  3703.     ENDIF
  3704.  
  3705. ;
  3706. ; pascal VideoDigitizerError VDSetPreferredPacketSize(VideoDigitizerComponent ci, long preferredPacketSizeInBytes)
  3707. ;
  3708.     IF ¬ GENERATINGCFM THEN
  3709.         Macro
  3710.         _VDSetPreferredPacketSize
  3711.             dc.w                $2F3C
  3712.             dc.w                $0004
  3713.             dc.w                $0059
  3714.             moveq               #0,d0
  3715.             dc.w                $A82A
  3716.         EndM
  3717.     ELSE
  3718.         IMPORT_CFM_FUNCTION VDSetPreferredPacketSize
  3719.     ENDIF
  3720.  
  3721. ;
  3722. ;    General Sequence Grab stuff
  3723. ;
  3724. ; typedef ComponentInstance             SeqGrabComponent
  3725.  
  3726. ; typedef ComponentInstance             SGChannel
  3727.  
  3728.  
  3729. SeqGrabComponentType            EQU        'barg'
  3730. SeqGrabChannelType                EQU        'sgch'
  3731. SeqGrabPanelType                EQU        'sgpn'
  3732. SeqGrabCompressionPanelType        EQU        'cmpr'
  3733. SeqGrabSourcePanelType            EQU        'sour'
  3734.  
  3735. seqGrabToDisk                    EQU        1
  3736. seqGrabToMemory                    EQU        2
  3737. seqGrabDontUseTempMemory        EQU        4
  3738. seqGrabAppendToFile                EQU        8
  3739. seqGrabDontAddMovieResource        EQU        16
  3740. seqGrabDontMakeMovie            EQU        32
  3741. seqGrabPreExtendFile            EQU        64
  3742. seqGrabDataProcIsInterruptSafe    EQU        128
  3743. seqGrabDataProcDoesOverlappingReads EQU    256
  3744. ; typedef unsigned long                 SeqGrabDataOutputEnum
  3745.  
  3746.  
  3747. seqGrabRecord                    EQU        1
  3748. seqGrabPreview                    EQU        2
  3749. seqGrabPlayDuringRecord            EQU        4
  3750. ; typedef unsigned long                 SeqGrabUsageEnum
  3751.  
  3752.  
  3753. seqGrabHasBounds                EQU        1
  3754. seqGrabHasVolume                EQU        2
  3755. seqGrabHasDiscreteSamples        EQU        4
  3756. ; typedef unsigned long                 SeqGrabChannelInfoEnum
  3757.  
  3758. SeqGrabFrameInfo        RECORD 0
  3759. frameOffset                 ds.l    1                ; offset: $0 (0)
  3760. frameTime                 ds.l    1                ; offset: $4 (4)
  3761. frameSize                 ds.l    1                ; offset: $8 (8)
  3762. frameChannel             ds.l    1                ; offset: $C (12)
  3763. frameRefCon                 ds.l    1                ; offset: $10 (16)
  3764. sizeof                     EQU *                    ; size:   $14 (20)
  3765.                         ENDR
  3766. ; typedef struct SeqGrabFrameInfo *        SeqGrabFrameInfoPtr
  3767.  
  3768.  
  3769. grabPictOffScreen                EQU        1
  3770. grabPictIgnoreClip                EQU        2
  3771. grabPictCurrentImage            EQU        4
  3772.  
  3773. sgFlagControlledGrab            EQU        $01
  3774. SGDeviceName            RECORD 0
  3775. name                     ds        Str63            ; offset: $0 (0)
  3776. icon                     ds.l    1                ; offset: $40 (64)
  3777. flags                     ds.l    1                ; offset: $44 (68)
  3778. refCon                     ds.l    1                ; offset: $48 (72)
  3779. reserved                 ds.l    1                ; offset: $4C (76)        ;  zero
  3780. sizeof                     EQU *                    ; size:   $50 (80)
  3781.                         ENDR
  3782.  
  3783. sgDeviceNameFlagDeviceUnavailable EQU    $01
  3784. SGDeviceListRecord        RECORD 0
  3785. count                     ds.w    1                ; offset: $0 (0)
  3786. selectedIndex             ds.w    1                ; offset: $2 (2)
  3787. reserved                 ds.l    1                ; offset: $4 (4)        ;  zero
  3788. entry                     ds        SGDeviceName    ; offset: $8 (8) <-- really an array of length one
  3789. sizeof                     EQU *                    ; size:   $58 (88)
  3790.                         ENDR
  3791. ; typedef struct SGDeviceListRecord *    SGDeviceListPtr
  3792.  
  3793. ; typedef SGDeviceListPtr *                SGDeviceList
  3794.  
  3795.  
  3796. sgDeviceListWithIcons            EQU        $01
  3797. sgDeviceListDontCheckAvailability EQU    $02
  3798.  
  3799. seqGrabWriteAppend                EQU        0
  3800. seqGrabWriteReserve                EQU        1
  3801. seqGrabWriteFill                EQU        2
  3802.  
  3803. seqGrabUnpause                    EQU        0
  3804. seqGrabPause                    EQU        1
  3805. seqGrabPauseForMenu                EQU        3
  3806.  
  3807. channelFlagDontOpenResFile        EQU        2
  3808. channelFlagHasDependency        EQU        4
  3809.  
  3810. sgPanelFlagForPanel                EQU        1
  3811.  
  3812. seqGrabSettingsPreviewOnly        EQU        1
  3813. SGOutputRecord            RECORD 0
  3814. data                     ds.l    1                ; offset: $0 (0) <-- really an array of length one
  3815. sizeof                     EQU *                    ; size:   $4 (4)
  3816.                         ENDR
  3817. ; typedef struct SGOutputRecord *        SGOutput
  3818.  
  3819.  
  3820. channelPlayNormal                EQU        0
  3821. channelPlayFast                    EQU        1
  3822. channelPlayHighQuality            EQU        2
  3823. channelPlayAllData                EQU        4
  3824. ;
  3825. ; pascal ComponentResult SGInitialize(SeqGrabComponent s)
  3826. ;
  3827.     IF ¬ GENERATINGCFM THEN
  3828.         Macro
  3829.         _SGInitialize
  3830.             dc.w                $2F3C
  3831.             dc.w                $0000
  3832.             dc.w                $0001
  3833.             moveq               #0,d0
  3834.             dc.w                $A82A
  3835.         EndM
  3836.     ELSE
  3837.         IMPORT_CFM_FUNCTION SGInitialize
  3838.     ENDIF
  3839.  
  3840. ;
  3841. ; pascal ComponentResult SGSetDataOutput(SeqGrabComponent s, const FSSpec *movieFile, long whereFlags)
  3842. ;
  3843.     IF ¬ GENERATINGCFM THEN
  3844.         Macro
  3845.         _SGSetDataOutput
  3846.             dc.w                $2F3C
  3847.             dc.w                $0008
  3848.             dc.w                $0002
  3849.             moveq               #0,d0
  3850.             dc.w                $A82A
  3851.         EndM
  3852.     ELSE
  3853.         IMPORT_CFM_FUNCTION SGSetDataOutput
  3854.     ENDIF
  3855.  
  3856. ;
  3857. ; pascal ComponentResult SGGetDataOutput(SeqGrabComponent s, FSSpec *movieFile, long *whereFlags)
  3858. ;
  3859.     IF ¬ GENERATINGCFM THEN
  3860.         Macro
  3861.         _SGGetDataOutput
  3862.             dc.w                $2F3C
  3863.             dc.w                $0008
  3864.             dc.w                $0003
  3865.             moveq               #0,d0
  3866.             dc.w                $A82A
  3867.         EndM
  3868.     ELSE
  3869.         IMPORT_CFM_FUNCTION SGGetDataOutput
  3870.     ENDIF
  3871.  
  3872. ;
  3873. ; pascal ComponentResult SGSetGWorld(SeqGrabComponent s, CGrafPtr gp, GDHandle gd)
  3874. ;
  3875.     IF ¬ GENERATINGCFM THEN
  3876.         Macro
  3877.         _SGSetGWorld
  3878.             dc.w                $2F3C
  3879.             dc.w                $0008
  3880.             dc.w                $0004
  3881.             moveq               #0,d0
  3882.             dc.w                $A82A
  3883.         EndM
  3884.     ELSE
  3885.         IMPORT_CFM_FUNCTION SGSetGWorld
  3886.     ENDIF
  3887.  
  3888. ;
  3889. ; pascal ComponentResult SGGetGWorld(SeqGrabComponent s, CGrafPtr *gp, GDHandle *gd)
  3890. ;
  3891.     IF ¬ GENERATINGCFM THEN
  3892.         Macro
  3893.         _SGGetGWorld
  3894.             dc.w                $2F3C
  3895.             dc.w                $0008
  3896.             dc.w                $0005
  3897.             moveq               #0,d0
  3898.             dc.w                $A82A
  3899.         EndM
  3900.     ELSE
  3901.         IMPORT_CFM_FUNCTION SGGetGWorld
  3902.     ENDIF
  3903.  
  3904. ;
  3905. ; pascal ComponentResult SGNewChannel(SeqGrabComponent s, OSType channelType, SGChannel *ref)
  3906. ;
  3907.     IF ¬ GENERATINGCFM THEN
  3908.         Macro
  3909.         _SGNewChannel
  3910.             dc.w                $2F3C
  3911.             dc.w                $0008
  3912.             dc.w                $0006
  3913.             moveq               #0,d0
  3914.             dc.w                $A82A
  3915.         EndM
  3916.     ELSE
  3917.         IMPORT_CFM_FUNCTION SGNewChannel
  3918.     ENDIF
  3919.  
  3920. ;
  3921. ; pascal ComponentResult SGDisposeChannel(SeqGrabComponent s, SGChannel c)
  3922. ;
  3923.     IF ¬ GENERATINGCFM THEN
  3924.         Macro
  3925.         _SGDisposeChannel
  3926.             dc.w                $2F3C
  3927.             dc.w                $0004
  3928.             dc.w                $0007
  3929.             moveq               #0,d0
  3930.             dc.w                $A82A
  3931.         EndM
  3932.     ELSE
  3933.         IMPORT_CFM_FUNCTION SGDisposeChannel
  3934.     ENDIF
  3935.  
  3936. ;
  3937. ; pascal ComponentResult SGStartPreview(SeqGrabComponent s)
  3938. ;
  3939.     IF ¬ GENERATINGCFM THEN
  3940.         Macro
  3941.         _SGStartPreview
  3942.             dc.w                $2F3C
  3943.             dc.w                $0000
  3944.             dc.w                $0010
  3945.             moveq               #0,d0
  3946.             dc.w                $A82A
  3947.         EndM
  3948.     ELSE
  3949.         IMPORT_CFM_FUNCTION SGStartPreview
  3950.     ENDIF
  3951.  
  3952. ;
  3953. ; pascal ComponentResult SGStartRecord(SeqGrabComponent s)
  3954. ;
  3955.     IF ¬ GENERATINGCFM THEN
  3956.         Macro
  3957.         _SGStartRecord
  3958.             dc.w                $2F3C
  3959.             dc.w                $0000
  3960.             dc.w                $0011
  3961.             moveq               #0,d0
  3962.             dc.w                $A82A
  3963.         EndM
  3964.     ELSE
  3965.         IMPORT_CFM_FUNCTION SGStartRecord
  3966.     ENDIF
  3967.  
  3968. ;
  3969. ; pascal ComponentResult SGIdle(SeqGrabComponent s)
  3970. ;
  3971.     IF ¬ GENERATINGCFM THEN
  3972.         Macro
  3973.         _SGIdle
  3974.             dc.w                $2F3C
  3975.             dc.w                $0000
  3976.             dc.w                $0012
  3977.             moveq               #0,d0
  3978.             dc.w                $A82A
  3979.         EndM
  3980.     ELSE
  3981.         IMPORT_CFM_FUNCTION SGIdle
  3982.     ENDIF
  3983.  
  3984. ;
  3985. ; pascal ComponentResult SGStop(SeqGrabComponent s)
  3986. ;
  3987.     IF ¬ GENERATINGCFM THEN
  3988.         Macro
  3989.         _SGStop
  3990.             dc.w                $2F3C
  3991.             dc.w                $0000
  3992.             dc.w                $0013
  3993.             moveq               #0,d0
  3994.             dc.w                $A82A
  3995.         EndM
  3996.     ELSE
  3997.         IMPORT_CFM_FUNCTION SGStop
  3998.     ENDIF
  3999.  
  4000. ;
  4001. ; pascal ComponentResult SGPause(SeqGrabComponent s, Byte pause)
  4002. ;
  4003.     IF ¬ GENERATINGCFM THEN
  4004.         Macro
  4005.         _SGPause
  4006.             dc.w                $2F3C
  4007.             dc.w                $0002
  4008.             dc.w                $0014
  4009.             moveq               #0,d0
  4010.             dc.w                $A82A
  4011.         EndM
  4012.     ELSE
  4013.         IMPORT_CFM_FUNCTION SGPause
  4014.     ENDIF
  4015.  
  4016. ;
  4017. ; pascal ComponentResult SGPrepare(SeqGrabComponent s, Boolean prepareForPreview, Boolean prepareForRecord)
  4018. ;
  4019.     IF ¬ GENERATINGCFM THEN
  4020.         Macro
  4021.         _SGPrepare
  4022.             dc.w                $2F3C
  4023.             dc.w                $0004
  4024.             dc.w                $0015
  4025.             moveq               #0,d0
  4026.             dc.w                $A82A
  4027.         EndM
  4028.     ELSE
  4029.         IMPORT_CFM_FUNCTION SGPrepare
  4030.     ENDIF
  4031.  
  4032. ;
  4033. ; pascal ComponentResult SGRelease(SeqGrabComponent s)
  4034. ;
  4035.     IF ¬ GENERATINGCFM THEN
  4036.         Macro
  4037.         _SGRelease
  4038.             dc.w                $2F3C
  4039.             dc.w                $0000
  4040.             dc.w                $0016
  4041.             moveq               #0,d0
  4042.             dc.w                $A82A
  4043.         EndM
  4044.     ELSE
  4045.         IMPORT_CFM_FUNCTION SGRelease
  4046.     ENDIF
  4047.  
  4048. ;
  4049. ; pascal Movie SGGetMovie(SeqGrabComponent s)
  4050. ;
  4051.     IF ¬ GENERATINGCFM THEN
  4052.         Macro
  4053.         _SGGetMovie
  4054.             dc.w                $2F3C
  4055.             dc.w                $0000
  4056.             dc.w                $0017
  4057.             moveq               #0,d0
  4058.             dc.w                $A82A
  4059.         EndM
  4060.     ELSE
  4061.         IMPORT_CFM_FUNCTION SGGetMovie
  4062.     ENDIF
  4063.  
  4064. ;
  4065. ; pascal ComponentResult SGSetMaximumRecordTime(SeqGrabComponent s, unsigned long ticks)
  4066. ;
  4067.     IF ¬ GENERATINGCFM THEN
  4068.         Macro
  4069.         _SGSetMaximumRecordTime
  4070.             dc.w                $2F3C
  4071.             dc.w                $0004
  4072.             dc.w                $0018
  4073.             moveq               #0,d0
  4074.             dc.w                $A82A
  4075.         EndM
  4076.     ELSE
  4077.         IMPORT_CFM_FUNCTION SGSetMaximumRecordTime
  4078.     ENDIF
  4079.  
  4080. ;
  4081. ; pascal ComponentResult SGGetMaximumRecordTime(SeqGrabComponent s, unsigned long *ticks)
  4082. ;
  4083.     IF ¬ GENERATINGCFM THEN
  4084.         Macro
  4085.         _SGGetMaximumRecordTime
  4086.             dc.w                $2F3C
  4087.             dc.w                $0004
  4088.             dc.w                $0019
  4089.             moveq               #0,d0
  4090.             dc.w                $A82A
  4091.         EndM
  4092.     ELSE
  4093.         IMPORT_CFM_FUNCTION SGGetMaximumRecordTime
  4094.     ENDIF
  4095.  
  4096. ;
  4097. ; pascal ComponentResult SGGetStorageSpaceRemaining(SeqGrabComponent s, unsigned long *bytes)
  4098. ;
  4099.     IF ¬ GENERATINGCFM THEN
  4100.         Macro
  4101.         _SGGetStorageSpaceRemaining
  4102.             dc.w                $2F3C
  4103.             dc.w                $0004
  4104.             dc.w                $001A
  4105.             moveq               #0,d0
  4106.             dc.w                $A82A
  4107.         EndM
  4108.     ELSE
  4109.         IMPORT_CFM_FUNCTION SGGetStorageSpaceRemaining
  4110.     ENDIF
  4111.  
  4112. ;
  4113. ; pascal ComponentResult SGGetTimeRemaining(SeqGrabComponent s, long *ticksLeft)
  4114. ;
  4115.     IF ¬ GENERATINGCFM THEN
  4116.         Macro
  4117.         _SGGetTimeRemaining
  4118.             dc.w                $2F3C
  4119.             dc.w                $0004
  4120.             dc.w                $001B
  4121.             moveq               #0,d0
  4122.             dc.w                $A82A
  4123.         EndM
  4124.     ELSE
  4125.         IMPORT_CFM_FUNCTION SGGetTimeRemaining
  4126.     ENDIF
  4127.  
  4128. ;
  4129. ; pascal ComponentResult SGGrabPict(SeqGrabComponent s, PicHandle *p, const Rect *bounds, short offscreenDepth, long grabPictFlags)
  4130. ;
  4131.     IF ¬ GENERATINGCFM THEN
  4132.         Macro
  4133.         _SGGrabPict
  4134.             dc.w                $2F3C
  4135.             dc.w                $000E
  4136.             dc.w                $001C
  4137.             moveq               #0,d0
  4138.             dc.w                $A82A
  4139.         EndM
  4140.     ELSE
  4141.         IMPORT_CFM_FUNCTION SGGrabPict
  4142.     ENDIF
  4143.  
  4144. ;
  4145. ; pascal ComponentResult SGGetLastMovieResID(SeqGrabComponent s, short *resID)
  4146. ;
  4147.     IF ¬ GENERATINGCFM THEN
  4148.         Macro
  4149.         _SGGetLastMovieResID
  4150.             dc.w                $2F3C
  4151.             dc.w                $0004
  4152.             dc.w                $001D
  4153.             moveq               #0,d0
  4154.             dc.w                $A82A
  4155.         EndM
  4156.     ELSE
  4157.         IMPORT_CFM_FUNCTION SGGetLastMovieResID
  4158.     ENDIF
  4159.  
  4160. ;
  4161. ; pascal ComponentResult SGSetFlags(SeqGrabComponent s, long sgFlags)
  4162. ;
  4163.     IF ¬ GENERATINGCFM THEN
  4164.         Macro
  4165.         _SGSetFlags
  4166.             dc.w                $2F3C
  4167.             dc.w                $0004
  4168.             dc.w                $001E
  4169.             moveq               #0,d0
  4170.             dc.w                $A82A
  4171.         EndM
  4172.     ELSE
  4173.         IMPORT_CFM_FUNCTION SGSetFlags
  4174.     ENDIF
  4175.  
  4176. ;
  4177. ; pascal ComponentResult SGGetFlags(SeqGrabComponent s, long *sgFlags)
  4178. ;
  4179.     IF ¬ GENERATINGCFM THEN
  4180.         Macro
  4181.         _SGGetFlags
  4182.             dc.w                $2F3C
  4183.             dc.w                $0004
  4184.             dc.w                $001F
  4185.             moveq               #0,d0
  4186.             dc.w                $A82A
  4187.         EndM
  4188.     ELSE
  4189.         IMPORT_CFM_FUNCTION SGGetFlags
  4190.     ENDIF
  4191.  
  4192. ;
  4193. ; pascal ComponentResult SGSetDataProc(SeqGrabComponent s, SGDataUPP proc, long refCon)
  4194. ;
  4195.     IF ¬ GENERATINGCFM THEN
  4196.         Macro
  4197.         _SGSetDataProc
  4198.             dc.w                $2F3C
  4199.             dc.w                $0008
  4200.             dc.w                $0020
  4201.             moveq               #0,d0
  4202.             dc.w                $A82A
  4203.         EndM
  4204.     ELSE
  4205.         IMPORT_CFM_FUNCTION SGSetDataProc
  4206.     ENDIF
  4207.  
  4208. ;
  4209. ; pascal ComponentResult SGNewChannelFromComponent(SeqGrabComponent s, SGChannel *newChannel, Component sgChannelComponent)
  4210. ;
  4211.     IF ¬ GENERATINGCFM THEN
  4212.         Macro
  4213.         _SGNewChannelFromComponent
  4214.             dc.w                $2F3C
  4215.             dc.w                $0008
  4216.             dc.w                $0021
  4217.             moveq               #0,d0
  4218.             dc.w                $A82A
  4219.         EndM
  4220.     ELSE
  4221.         IMPORT_CFM_FUNCTION SGNewChannelFromComponent
  4222.     ENDIF
  4223.  
  4224. ;
  4225. ; pascal ComponentResult SGDisposeDeviceList(SeqGrabComponent s, SGDeviceList list)
  4226. ;
  4227.     IF ¬ GENERATINGCFM THEN
  4228.         Macro
  4229.         _SGDisposeDeviceList
  4230.             dc.w                $2F3C
  4231.             dc.w                $0004
  4232.             dc.w                $0022
  4233.             moveq               #0,d0
  4234.             dc.w                $A82A
  4235.         EndM
  4236.     ELSE
  4237.         IMPORT_CFM_FUNCTION SGDisposeDeviceList
  4238.     ENDIF
  4239.  
  4240. ;
  4241. ; pascal ComponentResult SGAppendDeviceListToMenu(SeqGrabComponent s, SGDeviceList list, MenuHandle mh)
  4242. ;
  4243.     IF ¬ GENERATINGCFM THEN
  4244.         Macro
  4245.         _SGAppendDeviceListToMenu
  4246.             dc.w                $2F3C
  4247.             dc.w                $0008
  4248.             dc.w                $0023
  4249.             moveq               #0,d0
  4250.             dc.w                $A82A
  4251.         EndM
  4252.     ELSE
  4253.         IMPORT_CFM_FUNCTION SGAppendDeviceListToMenu
  4254.     ENDIF
  4255.  
  4256. ;
  4257. ; pascal ComponentResult SGSetSettings(SeqGrabComponent s, UserData ud, long flags)
  4258. ;
  4259.     IF ¬ GENERATINGCFM THEN
  4260.         Macro
  4261.         _SGSetSettings
  4262.             dc.w                $2F3C
  4263.             dc.w                $0008
  4264.             dc.w                $0024
  4265.             moveq               #0,d0
  4266.             dc.w                $A82A
  4267.         EndM
  4268.     ELSE
  4269.         IMPORT_CFM_FUNCTION SGSetSettings
  4270.     ENDIF
  4271.  
  4272. ;
  4273. ; pascal ComponentResult SGGetSettings(SeqGrabComponent s, UserData *ud, long flags)
  4274. ;
  4275.     IF ¬ GENERATINGCFM THEN
  4276.         Macro
  4277.         _SGGetSettings
  4278.             dc.w                $2F3C
  4279.             dc.w                $0008
  4280.             dc.w                $0025
  4281.             moveq               #0,d0
  4282.             dc.w                $A82A
  4283.         EndM
  4284.     ELSE
  4285.         IMPORT_CFM_FUNCTION SGGetSettings
  4286.     ENDIF
  4287.  
  4288. ;
  4289. ; pascal ComponentResult SGGetIndChannel(SeqGrabComponent s, short index, SGChannel *ref, OSType *chanType)
  4290. ;
  4291.     IF ¬ GENERATINGCFM THEN
  4292.         Macro
  4293.         _SGGetIndChannel
  4294.             dc.w                $2F3C
  4295.             dc.w                $000A
  4296.             dc.w                $0026
  4297.             moveq               #0,d0
  4298.             dc.w                $A82A
  4299.         EndM
  4300.     ELSE
  4301.         IMPORT_CFM_FUNCTION SGGetIndChannel
  4302.     ENDIF
  4303.  
  4304. ;
  4305. ; pascal ComponentResult SGUpdate(SeqGrabComponent s, RgnHandle updateRgn)
  4306. ;
  4307.     IF ¬ GENERATINGCFM THEN
  4308.         Macro
  4309.         _SGUpdate
  4310.             dc.w                $2F3C
  4311.             dc.w                $0004
  4312.             dc.w                $0027
  4313.             moveq               #0,d0
  4314.             dc.w                $A82A
  4315.         EndM
  4316.     ELSE
  4317.         IMPORT_CFM_FUNCTION SGUpdate
  4318.     ENDIF
  4319.  
  4320. ;
  4321. ; pascal ComponentResult SGGetPause(SeqGrabComponent s, Byte *paused)
  4322. ;
  4323.     IF ¬ GENERATINGCFM THEN
  4324.         Macro
  4325.         _SGGetPause
  4326.             dc.w                $2F3C
  4327.             dc.w                $0004
  4328.             dc.w                $0028
  4329.             moveq               #0,d0
  4330.             dc.w                $A82A
  4331.         EndM
  4332.     ELSE
  4333.         IMPORT_CFM_FUNCTION SGGetPause
  4334.     ENDIF
  4335.  
  4336. ; typedef const Component *                ConstComponentListPtr
  4337.  
  4338. ;
  4339. ; pascal ComponentResult SGSettingsDialog(SeqGrabComponent s, SGChannel c, short numPanels, ConstComponentListPtr panelList, long flags, SGModalFilterUPP proc, long procRefNum)
  4340. ;
  4341.     IF ¬ GENERATINGCFM THEN
  4342.         Macro
  4343.         _SGSettingsDialog
  4344.             dc.w                $2F3C
  4345.             dc.w                $0016
  4346.             dc.w                $0029
  4347.             moveq               #0,d0
  4348.             dc.w                $A82A
  4349.         EndM
  4350.     ELSE
  4351.         IMPORT_CFM_FUNCTION SGSettingsDialog
  4352.     ENDIF
  4353.  
  4354. ;
  4355. ; pascal ComponentResult SGGetAlignmentProc(SeqGrabComponent s, ICMAlignmentProcRecordPtr alignmentProc)
  4356. ;
  4357.     IF ¬ GENERATINGCFM THEN
  4358.         Macro
  4359.         _SGGetAlignmentProc
  4360.             dc.w                $2F3C
  4361.             dc.w                $0004
  4362.             dc.w                $002A
  4363.             moveq               #0,d0
  4364.             dc.w                $A82A
  4365.         EndM
  4366.     ELSE
  4367.         IMPORT_CFM_FUNCTION SGGetAlignmentProc
  4368.     ENDIF
  4369.  
  4370. ;
  4371. ; pascal ComponentResult SGSetChannelSettings(SeqGrabComponent s, SGChannel c, UserData ud, long flags)
  4372. ;
  4373.     IF ¬ GENERATINGCFM THEN
  4374.         Macro
  4375.         _SGSetChannelSettings
  4376.             dc.w                $2F3C
  4377.             dc.w                $000C
  4378.             dc.w                $002B
  4379.             moveq               #0,d0
  4380.             dc.w                $A82A
  4381.         EndM
  4382.     ELSE
  4383.         IMPORT_CFM_FUNCTION SGSetChannelSettings
  4384.     ENDIF
  4385.  
  4386. ;
  4387. ; pascal ComponentResult SGGetChannelSettings(SeqGrabComponent s, SGChannel c, UserData *ud, long flags)
  4388. ;
  4389.     IF ¬ GENERATINGCFM THEN
  4390.         Macro
  4391.         _SGGetChannelSettings
  4392.             dc.w                $2F3C
  4393.             dc.w                $000C
  4394.             dc.w                $002C
  4395.             moveq               #0,d0
  4396.             dc.w                $A82A
  4397.         EndM
  4398.     ELSE
  4399.         IMPORT_CFM_FUNCTION SGGetChannelSettings
  4400.     ENDIF
  4401.  
  4402. ;
  4403. ; pascal ComponentResult SGGetMode(SeqGrabComponent s, Boolean *previewMode, Boolean *recordMode)
  4404. ;
  4405.     IF ¬ GENERATINGCFM THEN
  4406.         Macro
  4407.         _SGGetMode
  4408.             dc.w                $2F3C
  4409.             dc.w                $0008
  4410.             dc.w                $002D
  4411.             moveq               #0,d0
  4412.             dc.w                $A82A
  4413.         EndM
  4414.     ELSE
  4415.         IMPORT_CFM_FUNCTION SGGetMode
  4416.     ENDIF
  4417.  
  4418. ;
  4419. ; pascal ComponentResult SGSetDataRef(SeqGrabComponent s, Handle dataRef, OSType dataRefType, long whereFlags)
  4420. ;
  4421.     IF ¬ GENERATINGCFM THEN
  4422.         Macro
  4423.         _SGSetDataRef
  4424.             dc.w                $2F3C
  4425.             dc.w                $000C
  4426.             dc.w                $002E
  4427.             moveq               #0,d0
  4428.             dc.w                $A82A
  4429.         EndM
  4430.     ELSE
  4431.         IMPORT_CFM_FUNCTION SGSetDataRef
  4432.     ENDIF
  4433.  
  4434. ;
  4435. ; pascal ComponentResult SGGetDataRef(SeqGrabComponent s, Handle *dataRef, OSType *dataRefType, long *whereFlags)
  4436. ;
  4437.     IF ¬ GENERATINGCFM THEN
  4438.         Macro
  4439.         _SGGetDataRef
  4440.             dc.w                $2F3C
  4441.             dc.w                $000C
  4442.             dc.w                $002F
  4443.             moveq               #0,d0
  4444.             dc.w                $A82A
  4445.         EndM
  4446.     ELSE
  4447.         IMPORT_CFM_FUNCTION SGGetDataRef
  4448.     ENDIF
  4449.  
  4450. ;
  4451. ; pascal ComponentResult SGNewOutput(SeqGrabComponent s, Handle dataRef, OSType dataRefType, long whereFlags, SGOutput *sgOut)
  4452. ;
  4453.     IF ¬ GENERATINGCFM THEN
  4454.         Macro
  4455.         _SGNewOutput
  4456.             dc.w                $2F3C
  4457.             dc.w                $0010
  4458.             dc.w                $0030
  4459.             moveq               #0,d0
  4460.             dc.w                $A82A
  4461.         EndM
  4462.     ELSE
  4463.         IMPORT_CFM_FUNCTION SGNewOutput
  4464.     ENDIF
  4465.  
  4466. ;
  4467. ; pascal ComponentResult SGDisposeOutput(SeqGrabComponent s, SGOutput sgOut)
  4468. ;
  4469.     IF ¬ GENERATINGCFM THEN
  4470.         Macro
  4471.         _SGDisposeOutput
  4472.             dc.w                $2F3C
  4473.             dc.w                $0004
  4474.             dc.w                $0031
  4475.             moveq               #0,d0
  4476.             dc.w                $A82A
  4477.         EndM
  4478.     ELSE
  4479.         IMPORT_CFM_FUNCTION SGDisposeOutput
  4480.     ENDIF
  4481.  
  4482. ;
  4483. ; pascal ComponentResult SGSetOutputFlags(SeqGrabComponent s, SGOutput sgOut, long whereFlags)
  4484. ;
  4485.     IF ¬ GENERATINGCFM THEN
  4486.         Macro
  4487.         _SGSetOutputFlags
  4488.             dc.w                $2F3C
  4489.             dc.w                $0008
  4490.             dc.w                $0032
  4491.             moveq               #0,d0
  4492.             dc.w                $A82A
  4493.         EndM
  4494.     ELSE
  4495.         IMPORT_CFM_FUNCTION SGSetOutputFlags
  4496.     ENDIF
  4497.  
  4498. ;
  4499. ; pascal ComponentResult SGSetChannelOutput(SeqGrabComponent s, SGChannel c, SGOutput sgOut)
  4500. ;
  4501.     IF ¬ GENERATINGCFM THEN
  4502.         Macro
  4503.         _SGSetChannelOutput
  4504.             dc.w                $2F3C
  4505.             dc.w                $0008
  4506.             dc.w                $0033
  4507.             moveq               #0,d0
  4508.             dc.w                $A82A
  4509.         EndM
  4510.     ELSE
  4511.         IMPORT_CFM_FUNCTION SGSetChannelOutput
  4512.     ENDIF
  4513.  
  4514. ;
  4515. ; pascal ComponentResult SGGetDataOutputStorageSpaceRemaining(SeqGrabComponent s, SGOutput sgOut, unsigned long *space)
  4516. ;
  4517.     IF ¬ GENERATINGCFM THEN
  4518.         Macro
  4519.         _SGGetDataOutputStorageSpaceRemaining
  4520.             dc.w                $2F3C
  4521.             dc.w                $0008
  4522.             dc.w                $0034
  4523.             moveq               #0,d0
  4524.             dc.w                $A82A
  4525.         EndM
  4526.     ELSE
  4527.         IMPORT_CFM_FUNCTION SGGetDataOutputStorageSpaceRemaining
  4528.     ENDIF
  4529.  
  4530. ;
  4531. ; pascal ComponentResult SGHandleUpdateEvent(SeqGrabComponent s, EventRecord *event, Boolean *handled)
  4532. ;
  4533.     IF ¬ GENERATINGCFM THEN
  4534.         Macro
  4535.         _SGHandleUpdateEvent
  4536.             dc.w                $2F3C
  4537.             dc.w                $0008
  4538.             dc.w                $0035
  4539.             moveq               #0,d0
  4540.             dc.w                $A82A
  4541.         EndM
  4542.     ELSE
  4543.         IMPORT_CFM_FUNCTION SGHandleUpdateEvent
  4544.     ENDIF
  4545.  
  4546. ;
  4547. ;    calls from Channel to seqGrab
  4548. ;
  4549. ;
  4550. ; pascal ComponentResult SGWriteMovieData(SeqGrabComponent s, SGChannel c, Ptr p, long len, long *offset)
  4551. ;
  4552.     IF ¬ GENERATINGCFM THEN
  4553.         Macro
  4554.         _SGWriteMovieData
  4555.             dc.w                $2F3C
  4556.             dc.w                $0010
  4557.             dc.w                $0100
  4558.             moveq               #0,d0
  4559.             dc.w                $A82A
  4560.         EndM
  4561.     ELSE
  4562.         IMPORT_CFM_FUNCTION SGWriteMovieData
  4563.     ENDIF
  4564.  
  4565. ;
  4566. ; pascal ComponentResult SGAddFrameReference(SeqGrabComponent s, SeqGrabFrameInfoPtr frameInfo)
  4567. ;
  4568.     IF ¬ GENERATINGCFM THEN
  4569.         Macro
  4570.         _SGAddFrameReference
  4571.             dc.w                $2F3C
  4572.             dc.w                $0004
  4573.             dc.w                $0101
  4574.             moveq               #0,d0
  4575.             dc.w                $A82A
  4576.         EndM
  4577.     ELSE
  4578.         IMPORT_CFM_FUNCTION SGAddFrameReference
  4579.     ENDIF
  4580.  
  4581. ;
  4582. ; pascal ComponentResult SGGetNextFrameReference(SeqGrabComponent s, SeqGrabFrameInfoPtr frameInfo, TimeValue *frameDuration, long *frameNumber)
  4583. ;
  4584.     IF ¬ GENERATINGCFM THEN
  4585.         Macro
  4586.         _SGGetNextFrameReference
  4587.             dc.w                $2F3C
  4588.             dc.w                $000C
  4589.             dc.w                $0102
  4590.             moveq               #0,d0
  4591.             dc.w                $A82A
  4592.         EndM
  4593.     ELSE
  4594.         IMPORT_CFM_FUNCTION SGGetNextFrameReference
  4595.     ENDIF
  4596.  
  4597. ;
  4598. ; pascal ComponentResult SGGetTimeBase(SeqGrabComponent s, TimeBase *tb)
  4599. ;
  4600.     IF ¬ GENERATINGCFM THEN
  4601.         Macro
  4602.         _SGGetTimeBase
  4603.             dc.w                $2F3C
  4604.             dc.w                $0004
  4605.             dc.w                $0103
  4606.             moveq               #0,d0
  4607.             dc.w                $A82A
  4608.         EndM
  4609.     ELSE
  4610.         IMPORT_CFM_FUNCTION SGGetTimeBase
  4611.     ENDIF
  4612.  
  4613. ;
  4614. ; pascal ComponentResult SGSortDeviceList(SeqGrabComponent s, SGDeviceList list)
  4615. ;
  4616.     IF ¬ GENERATINGCFM THEN
  4617.         Macro
  4618.         _SGSortDeviceList
  4619.             dc.w                $2F3C
  4620.             dc.w                $0004
  4621.             dc.w                $0104
  4622.             moveq               #0,d0
  4623.             dc.w                $A82A
  4624.         EndM
  4625.     ELSE
  4626.         IMPORT_CFM_FUNCTION SGSortDeviceList
  4627.     ENDIF
  4628.  
  4629. ;
  4630. ; pascal ComponentResult SGAddMovieData(SeqGrabComponent s, SGChannel c, Ptr p, long len, long *offset, long chRefCon, TimeValue time, short writeType)
  4631. ;
  4632.     IF ¬ GENERATINGCFM THEN
  4633.         Macro
  4634.         _SGAddMovieData
  4635.             dc.w                $2F3C
  4636.             dc.w                $001A
  4637.             dc.w                $0105
  4638.             moveq               #0,d0
  4639.             dc.w                $A82A
  4640.         EndM
  4641.     ELSE
  4642.         IMPORT_CFM_FUNCTION SGAddMovieData
  4643.     ENDIF
  4644.  
  4645. ;
  4646. ; pascal ComponentResult SGChangedSource(SeqGrabComponent s, SGChannel c)
  4647. ;
  4648.     IF ¬ GENERATINGCFM THEN
  4649.         Macro
  4650.         _SGChangedSource
  4651.             dc.w                $2F3C
  4652.             dc.w                $0004
  4653.             dc.w                $0106
  4654.             moveq               #0,d0
  4655.             dc.w                $A82A
  4656.         EndM
  4657.     ELSE
  4658.         IMPORT_CFM_FUNCTION SGChangedSource
  4659.     ENDIF
  4660.  
  4661. ; ** Sequence Grab CHANNEL Component Stuff **
  4662. ;
  4663. ; pascal ComponentResult SGSetChannelUsage(SGChannel c, long usage)
  4664. ;
  4665.     IF ¬ GENERATINGCFM THEN
  4666.         Macro
  4667.         _SGSetChannelUsage
  4668.             dc.w                $2F3C
  4669.             dc.w                $0004
  4670.             dc.w                $0080
  4671.             moveq               #0,d0
  4672.             dc.w                $A82A
  4673.         EndM
  4674.     ELSE
  4675.         IMPORT_CFM_FUNCTION SGSetChannelUsage
  4676.     ENDIF
  4677.  
  4678. ;
  4679. ; pascal ComponentResult SGGetChannelUsage(SGChannel c, long *usage)
  4680. ;
  4681.     IF ¬ GENERATINGCFM THEN
  4682.         Macro
  4683.         _SGGetChannelUsage
  4684.             dc.w                $2F3C
  4685.             dc.w                $0004
  4686.             dc.w                $0081
  4687.             moveq               #0,d0
  4688.             dc.w                $A82A
  4689.         EndM
  4690.     ELSE
  4691.         IMPORT_CFM_FUNCTION SGGetChannelUsage
  4692.     ENDIF
  4693.  
  4694. ;
  4695. ; pascal ComponentResult SGSetChannelBounds(SGChannel c, const Rect *bounds)
  4696. ;
  4697.     IF ¬ GENERATINGCFM THEN
  4698.         Macro
  4699.         _SGSetChannelBounds
  4700.             dc.w                $2F3C
  4701.             dc.w                $0004
  4702.             dc.w                $0082
  4703.             moveq               #0,d0
  4704.             dc.w                $A82A
  4705.         EndM
  4706.     ELSE
  4707.         IMPORT_CFM_FUNCTION SGSetChannelBounds
  4708.     ENDIF
  4709.  
  4710. ;
  4711. ; pascal ComponentResult SGGetChannelBounds(SGChannel c, Rect *bounds)
  4712. ;
  4713.     IF ¬ GENERATINGCFM THEN
  4714.         Macro
  4715.         _SGGetChannelBounds
  4716.             dc.w                $2F3C
  4717.             dc.w                $0004
  4718.             dc.w                $0083
  4719.             moveq               #0,d0
  4720.             dc.w                $A82A
  4721.         EndM
  4722.     ELSE
  4723.         IMPORT_CFM_FUNCTION SGGetChannelBounds
  4724.     ENDIF
  4725.  
  4726. ;
  4727. ; pascal ComponentResult SGSetChannelVolume(SGChannel c, short volume)
  4728. ;
  4729.     IF ¬ GENERATINGCFM THEN
  4730.         Macro
  4731.         _SGSetChannelVolume
  4732.             dc.w                $2F3C
  4733.             dc.w                $0002
  4734.             dc.w                $0084
  4735.             moveq               #0,d0
  4736.             dc.w                $A82A
  4737.         EndM
  4738.     ELSE
  4739.         IMPORT_CFM_FUNCTION SGSetChannelVolume
  4740.     ENDIF
  4741.  
  4742. ;
  4743. ; pascal ComponentResult SGGetChannelVolume(SGChannel c, short *volume)
  4744. ;
  4745.     IF ¬ GENERATINGCFM THEN
  4746.         Macro
  4747.         _SGGetChannelVolume
  4748.             dc.w                $2F3C
  4749.             dc.w                $0004
  4750.             dc.w                $0085
  4751.             moveq               #0,d0
  4752.             dc.w                $A82A
  4753.         EndM
  4754.     ELSE
  4755.         IMPORT_CFM_FUNCTION SGGetChannelVolume
  4756.     ENDIF
  4757.  
  4758. ;
  4759. ; pascal ComponentResult SGGetChannelInfo(SGChannel c, long *channelInfo)
  4760. ;
  4761.     IF ¬ GENERATINGCFM THEN
  4762.         Macro
  4763.         _SGGetChannelInfo
  4764.             dc.w                $2F3C
  4765.             dc.w                $0004
  4766.             dc.w                $0086
  4767.             moveq               #0,d0
  4768.             dc.w                $A82A
  4769.         EndM
  4770.     ELSE
  4771.         IMPORT_CFM_FUNCTION SGGetChannelInfo
  4772.     ENDIF
  4773.  
  4774. ;
  4775. ; pascal ComponentResult SGSetChannelPlayFlags(SGChannel c, long playFlags)
  4776. ;
  4777.     IF ¬ GENERATINGCFM THEN
  4778.         Macro
  4779.         _SGSetChannelPlayFlags
  4780.             dc.w                $2F3C
  4781.             dc.w                $0004
  4782.             dc.w                $0087
  4783.             moveq               #0,d0
  4784.             dc.w                $A82A
  4785.         EndM
  4786.     ELSE
  4787.         IMPORT_CFM_FUNCTION SGSetChannelPlayFlags
  4788.     ENDIF
  4789.  
  4790. ;
  4791. ; pascal ComponentResult SGGetChannelPlayFlags(SGChannel c, long *playFlags)
  4792. ;
  4793.     IF ¬ GENERATINGCFM THEN
  4794.         Macro
  4795.         _SGGetChannelPlayFlags
  4796.             dc.w                $2F3C
  4797.             dc.w                $0004
  4798.             dc.w                $0088
  4799.             moveq               #0,d0
  4800.             dc.w                $A82A
  4801.         EndM
  4802.     ELSE
  4803.         IMPORT_CFM_FUNCTION SGGetChannelPlayFlags
  4804.     ENDIF
  4805.  
  4806. ;
  4807. ; pascal ComponentResult SGSetChannelMaxFrames(SGChannel c, long frameCount)
  4808. ;
  4809.     IF ¬ GENERATINGCFM THEN
  4810.         Macro
  4811.         _SGSetChannelMaxFrames
  4812.             dc.w                $2F3C
  4813.             dc.w                $0004
  4814.             dc.w                $0089
  4815.             moveq               #0,d0
  4816.             dc.w                $A82A
  4817.         EndM
  4818.     ELSE
  4819.         IMPORT_CFM_FUNCTION SGSetChannelMaxFrames
  4820.     ENDIF
  4821.  
  4822. ;
  4823. ; pascal ComponentResult SGGetChannelMaxFrames(SGChannel c, long *frameCount)
  4824. ;
  4825.     IF ¬ GENERATINGCFM THEN
  4826.         Macro
  4827.         _SGGetChannelMaxFrames
  4828.             dc.w                $2F3C
  4829.             dc.w                $0004
  4830.             dc.w                $008A
  4831.             moveq               #0,d0
  4832.             dc.w                $A82A
  4833.         EndM
  4834.     ELSE
  4835.         IMPORT_CFM_FUNCTION SGGetChannelMaxFrames
  4836.     ENDIF
  4837.  
  4838. ;
  4839. ; pascal ComponentResult SGSetChannelRefCon(SGChannel c, long refCon)
  4840. ;
  4841.     IF ¬ GENERATINGCFM THEN
  4842.         Macro
  4843.         _SGSetChannelRefCon
  4844.             dc.w                $2F3C
  4845.             dc.w                $0004
  4846.             dc.w                $008B
  4847.             moveq               #0,d0
  4848.             dc.w                $A82A
  4849.         EndM
  4850.     ELSE
  4851.         IMPORT_CFM_FUNCTION SGSetChannelRefCon
  4852.     ENDIF
  4853.  
  4854. ;
  4855. ; pascal ComponentResult SGSetChannelClip(SGChannel c, RgnHandle theClip)
  4856. ;
  4857.     IF ¬ GENERATINGCFM THEN
  4858.         Macro
  4859.         _SGSetChannelClip
  4860.             dc.w                $2F3C
  4861.             dc.w                $0004
  4862.             dc.w                $008C
  4863.             moveq               #0,d0
  4864.             dc.w                $A82A
  4865.         EndM
  4866.     ELSE
  4867.         IMPORT_CFM_FUNCTION SGSetChannelClip
  4868.     ENDIF
  4869.  
  4870. ;
  4871. ; pascal ComponentResult SGGetChannelClip(SGChannel c, RgnHandle *theClip)
  4872. ;
  4873.     IF ¬ GENERATINGCFM THEN
  4874.         Macro
  4875.         _SGGetChannelClip
  4876.             dc.w                $2F3C
  4877.             dc.w                $0004
  4878.             dc.w                $008D
  4879.             moveq               #0,d0
  4880.             dc.w                $A82A
  4881.         EndM
  4882.     ELSE
  4883.         IMPORT_CFM_FUNCTION SGGetChannelClip
  4884.     ENDIF
  4885.  
  4886. ;
  4887. ; pascal ComponentResult SGGetChannelSampleDescription(SGChannel c, Handle sampleDesc)
  4888. ;
  4889.     IF ¬ GENERATINGCFM THEN
  4890.         Macro
  4891.         _SGGetChannelSampleDescription
  4892.             dc.w                $2F3C
  4893.             dc.w                $0004
  4894.             dc.w                $008E
  4895.             moveq               #0,d0
  4896.             dc.w                $A82A
  4897.         EndM
  4898.     ELSE
  4899.         IMPORT_CFM_FUNCTION SGGetChannelSampleDescription
  4900.     ENDIF
  4901.  
  4902. ;
  4903. ; pascal ComponentResult SGGetChannelDeviceList(SGChannel c, long selectionFlags, SGDeviceList *list)
  4904. ;
  4905.     IF ¬ GENERATINGCFM THEN
  4906.         Macro
  4907.         _SGGetChannelDeviceList
  4908.             dc.w                $2F3C
  4909.             dc.w                $0008
  4910.             dc.w                $008F
  4911.             moveq               #0,d0
  4912.             dc.w                $A82A
  4913.         EndM
  4914.     ELSE
  4915.         IMPORT_CFM_FUNCTION SGGetChannelDeviceList
  4916.     ENDIF
  4917.  
  4918. ;
  4919. ; pascal ComponentResult SGSetChannelDevice(SGChannel c, StringPtr name)
  4920. ;
  4921.     IF ¬ GENERATINGCFM THEN
  4922.         Macro
  4923.         _SGSetChannelDevice
  4924.             dc.w                $2F3C
  4925.             dc.w                $0004
  4926.             dc.w                $0090
  4927.             moveq               #0,d0
  4928.             dc.w                $A82A
  4929.         EndM
  4930.     ELSE
  4931.         IMPORT_CFM_FUNCTION SGSetChannelDevice
  4932.     ENDIF
  4933.  
  4934. ;
  4935. ; pascal ComponentResult SGSetChannelMatrix(SGChannel c, const MatrixRecord *m)
  4936. ;
  4937.     IF ¬ GENERATINGCFM THEN
  4938.         Macro
  4939.         _SGSetChannelMatrix
  4940.             dc.w                $2F3C
  4941.             dc.w                $0004
  4942.             dc.w                $0091
  4943.             moveq               #0,d0
  4944.             dc.w                $A82A
  4945.         EndM
  4946.     ELSE
  4947.         IMPORT_CFM_FUNCTION SGSetChannelMatrix
  4948.     ENDIF
  4949.  
  4950. ;
  4951. ; pascal ComponentResult SGGetChannelMatrix(SGChannel c, MatrixRecord *m)
  4952. ;
  4953.     IF ¬ GENERATINGCFM THEN
  4954.         Macro
  4955.         _SGGetChannelMatrix
  4956.             dc.w                $2F3C
  4957.             dc.w                $0004
  4958.             dc.w                $0092
  4959.             moveq               #0,d0
  4960.             dc.w                $A82A
  4961.         EndM
  4962.     ELSE
  4963.         IMPORT_CFM_FUNCTION SGGetChannelMatrix
  4964.     ENDIF
  4965.  
  4966. ;
  4967. ; pascal ComponentResult SGGetChannelTimeScale(SGChannel c, TimeScale *scale)
  4968. ;
  4969.     IF ¬ GENERATINGCFM THEN
  4970.         Macro
  4971.         _SGGetChannelTimeScale
  4972.             dc.w                $2F3C
  4973.             dc.w                $0004
  4974.             dc.w                $0093
  4975.             moveq               #0,d0
  4976.             dc.w                $A82A
  4977.         EndM
  4978.     ELSE
  4979.         IMPORT_CFM_FUNCTION SGGetChannelTimeScale
  4980.     ENDIF
  4981.  
  4982. ;
  4983. ; pascal ComponentResult SGChannelPutPicture(SGChannel c)
  4984. ;
  4985.     IF ¬ GENERATINGCFM THEN
  4986.         Macro
  4987.         _SGChannelPutPicture
  4988.             dc.w                $2F3C
  4989.             dc.w                $0000
  4990.             dc.w                $0094
  4991.             moveq               #0,d0
  4992.             dc.w                $A82A
  4993.         EndM
  4994.     ELSE
  4995.         IMPORT_CFM_FUNCTION SGChannelPutPicture
  4996.     ENDIF
  4997.  
  4998. ;
  4999. ; pascal ComponentResult SGChannelSetRequestedDataRate(SGChannel c, long bytesPerSecond)
  5000. ;
  5001.     IF ¬ GENERATINGCFM THEN
  5002.         Macro
  5003.         _SGChannelSetRequestedDataRate
  5004.             dc.w                $2F3C
  5005.             dc.w                $0004
  5006.             dc.w                $0095
  5007.             moveq               #0,d0
  5008.             dc.w                $A82A
  5009.         EndM
  5010.     ELSE
  5011.         IMPORT_CFM_FUNCTION SGChannelSetRequestedDataRate
  5012.     ENDIF
  5013.  
  5014. ;
  5015. ; pascal ComponentResult SGChannelGetRequestedDataRate(SGChannel c, long *bytesPerSecond)
  5016. ;
  5017.     IF ¬ GENERATINGCFM THEN
  5018.         Macro
  5019.         _SGChannelGetRequestedDataRate
  5020.             dc.w                $2F3C
  5021.             dc.w                $0004
  5022.             dc.w                $0096
  5023.             moveq               #0,d0
  5024.             dc.w                $A82A
  5025.         EndM
  5026.     ELSE
  5027.         IMPORT_CFM_FUNCTION SGChannelGetRequestedDataRate
  5028.     ENDIF
  5029.  
  5030. ;
  5031. ; pascal ComponentResult SGChannelSetDataSourceName(SGChannel c, ConstStr255Param name, ScriptCode scriptTag)
  5032. ;
  5033.     IF ¬ GENERATINGCFM THEN
  5034.         Macro
  5035.         _SGChannelSetDataSourceName
  5036.             dc.w                $2F3C
  5037.             dc.w                $0006
  5038.             dc.w                $0097
  5039.             moveq               #0,d0
  5040.             dc.w                $A82A
  5041.         EndM
  5042.     ELSE
  5043.         IMPORT_CFM_FUNCTION SGChannelSetDataSourceName
  5044.     ENDIF
  5045.  
  5046. ;
  5047. ; pascal ComponentResult SGChannelGetDataSourceName(SGChannel c, Str255 name, ScriptCode *scriptTag)
  5048. ;
  5049.     IF ¬ GENERATINGCFM THEN
  5050.         Macro
  5051.         _SGChannelGetDataSourceName
  5052.             dc.w                $2F3C
  5053.             dc.w                $0008
  5054.             dc.w                $0098
  5055.             moveq               #0,d0
  5056.             dc.w                $A82A
  5057.         EndM
  5058.     ELSE
  5059.         IMPORT_CFM_FUNCTION SGChannelGetDataSourceName
  5060.     ENDIF
  5061.  
  5062. ;
  5063. ;    calls from seqGrab to Channel
  5064. ;
  5065. ;
  5066. ; pascal ComponentResult SGInitChannel(SGChannel c, SeqGrabComponent owner)
  5067. ;
  5068.     IF ¬ GENERATINGCFM THEN
  5069.         Macro
  5070.         _SGInitChannel
  5071.             dc.w                $2F3C
  5072.             dc.w                $0004
  5073.             dc.w                $0180
  5074.             moveq               #0,d0
  5075.             dc.w                $A82A
  5076.         EndM
  5077.     ELSE
  5078.         IMPORT_CFM_FUNCTION SGInitChannel
  5079.     ENDIF
  5080.  
  5081. ;
  5082. ; pascal ComponentResult SGWriteSamples(SGChannel c, Movie m, AliasHandle theFile)
  5083. ;
  5084.     IF ¬ GENERATINGCFM THEN
  5085.         Macro
  5086.         _SGWriteSamples
  5087.             dc.w                $2F3C
  5088.             dc.w                $0008
  5089.             dc.w                $0181
  5090.             moveq               #0,d0
  5091.             dc.w                $A82A
  5092.         EndM
  5093.     ELSE
  5094.         IMPORT_CFM_FUNCTION SGWriteSamples
  5095.     ENDIF
  5096.  
  5097. ;
  5098. ; pascal ComponentResult SGGetDataRate(SGChannel c, long *bytesPerSecond)
  5099. ;
  5100.     IF ¬ GENERATINGCFM THEN
  5101.         Macro
  5102.         _SGGetDataRate
  5103.             dc.w                $2F3C
  5104.             dc.w                $0004
  5105.             dc.w                $0182
  5106.             moveq               #0,d0
  5107.             dc.w                $A82A
  5108.         EndM
  5109.     ELSE
  5110.         IMPORT_CFM_FUNCTION SGGetDataRate
  5111.     ENDIF
  5112.  
  5113. ;
  5114. ; pascal ComponentResult SGAlignChannelRect(SGChannel c, Rect *r)
  5115. ;
  5116.     IF ¬ GENERATINGCFM THEN
  5117.         Macro
  5118.         _SGAlignChannelRect
  5119.             dc.w                $2F3C
  5120.             dc.w                $0004
  5121.             dc.w                $0183
  5122.             moveq               #0,d0
  5123.             dc.w                $A82A
  5124.         EndM
  5125.     ELSE
  5126.         IMPORT_CFM_FUNCTION SGAlignChannelRect
  5127.     ENDIF
  5128.  
  5129. ;
  5130. ;    Dorky dialog panel calls
  5131. ;
  5132. ;
  5133. ; pascal ComponentResult SGPanelGetDitl(SeqGrabComponent s, Handle *ditl)
  5134. ;
  5135.     IF ¬ GENERATINGCFM THEN
  5136.         Macro
  5137.         _SGPanelGetDitl
  5138.             dc.w                $2F3C
  5139.             dc.w                $0004
  5140.             dc.w                $0200
  5141.             moveq               #0,d0
  5142.             dc.w                $A82A
  5143.         EndM
  5144.     ELSE
  5145.         IMPORT_CFM_FUNCTION SGPanelGetDitl
  5146.     ENDIF
  5147.  
  5148. ;
  5149. ; pascal ComponentResult SGPanelGetTitle(SeqGrabComponent s, Str255 title)
  5150. ;
  5151.     IF ¬ GENERATINGCFM THEN
  5152.         Macro
  5153.         _SGPanelGetTitle
  5154.             dc.w                $2F3C
  5155.             dc.w                $0004
  5156.             dc.w                $0201
  5157.             moveq               #0,d0
  5158.             dc.w                $A82A
  5159.         EndM
  5160.     ELSE
  5161.         IMPORT_CFM_FUNCTION SGPanelGetTitle
  5162.     ENDIF
  5163.  
  5164. ;
  5165. ; pascal ComponentResult SGPanelCanRun(SeqGrabComponent s, SGChannel c)
  5166. ;
  5167.     IF ¬ GENERATINGCFM THEN
  5168.         Macro
  5169.         _SGPanelCanRun
  5170.             dc.w                $2F3C
  5171.             dc.w                $0004
  5172.             dc.w                $0202
  5173.             moveq               #0,d0
  5174.             dc.w                $A82A
  5175.         EndM
  5176.     ELSE
  5177.         IMPORT_CFM_FUNCTION SGPanelCanRun
  5178.     ENDIF
  5179.  
  5180. ;
  5181. ; pascal ComponentResult SGPanelInstall(SeqGrabComponent s, SGChannel c, DialogPtr d, short itemOffset)
  5182. ;
  5183.     IF ¬ GENERATINGCFM THEN
  5184.         Macro
  5185.         _SGPanelInstall
  5186.             dc.w                $2F3C
  5187.             dc.w                $000A
  5188.             dc.w                $0203
  5189.             moveq               #0,d0
  5190.             dc.w                $A82A
  5191.         EndM
  5192.     ELSE
  5193.         IMPORT_CFM_FUNCTION SGPanelInstall
  5194.     ENDIF
  5195.  
  5196. ;
  5197. ; pascal ComponentResult SGPanelEvent(SeqGrabComponent s, SGChannel c, DialogPtr d, short itemOffset, EventRecord *theEvent, short *itemHit, Boolean *handled)
  5198. ;
  5199.     IF ¬ GENERATINGCFM THEN
  5200.         Macro
  5201.         _SGPanelEvent
  5202.             dc.w                $2F3C
  5203.             dc.w                $0016
  5204.             dc.w                $0204
  5205.             moveq               #0,d0
  5206.             dc.w                $A82A
  5207.         EndM
  5208.     ELSE
  5209.         IMPORT_CFM_FUNCTION SGPanelEvent
  5210.     ENDIF
  5211.  
  5212. ;
  5213. ; pascal ComponentResult SGPanelItem(SeqGrabComponent s, SGChannel c, DialogPtr d, short itemOffset, short itemNum)
  5214. ;
  5215.     IF ¬ GENERATINGCFM THEN
  5216.         Macro
  5217.         _SGPanelItem
  5218.             dc.w                $2F3C
  5219.             dc.w                $000C
  5220.             dc.w                $0205
  5221.             moveq               #0,d0
  5222.             dc.w                $A82A
  5223.         EndM
  5224.     ELSE
  5225.         IMPORT_CFM_FUNCTION SGPanelItem
  5226.     ENDIF
  5227.  
  5228. ;
  5229. ; pascal ComponentResult SGPanelRemove(SeqGrabComponent s, SGChannel c, DialogPtr d, short itemOffset)
  5230. ;
  5231.     IF ¬ GENERATINGCFM THEN
  5232.         Macro
  5233.         _SGPanelRemove
  5234.             dc.w                $2F3C
  5235.             dc.w                $000A
  5236.             dc.w                $0206
  5237.             moveq               #0,d0
  5238.             dc.w                $A82A
  5239.         EndM
  5240.     ELSE
  5241.         IMPORT_CFM_FUNCTION SGPanelRemove
  5242.     ENDIF
  5243.  
  5244. ;
  5245. ; pascal ComponentResult SGPanelSetGrabber(SeqGrabComponent s, SeqGrabComponent sg)
  5246. ;
  5247.     IF ¬ GENERATINGCFM THEN
  5248.         Macro
  5249.         _SGPanelSetGrabber
  5250.             dc.w                $2F3C
  5251.             dc.w                $0004
  5252.             dc.w                $0207
  5253.             moveq               #0,d0
  5254.             dc.w                $A82A
  5255.         EndM
  5256.     ELSE
  5257.         IMPORT_CFM_FUNCTION SGPanelSetGrabber
  5258.     ENDIF
  5259.  
  5260. ;
  5261. ; pascal ComponentResult SGPanelSetResFile(SeqGrabComponent s, short resRef)
  5262. ;
  5263.     IF ¬ GENERATINGCFM THEN
  5264.         Macro
  5265.         _SGPanelSetResFile
  5266.             dc.w                $2F3C
  5267.             dc.w                $0002
  5268.             dc.w                $0208
  5269.             moveq               #0,d0
  5270.             dc.w                $A82A
  5271.         EndM
  5272.     ELSE
  5273.         IMPORT_CFM_FUNCTION SGPanelSetResFile
  5274.     ENDIF
  5275.  
  5276. ;
  5277. ; pascal ComponentResult SGPanelGetSettings(SeqGrabComponent s, SGChannel c, UserData *ud, long flags)
  5278. ;
  5279.     IF ¬ GENERATINGCFM THEN
  5280.         Macro
  5281.         _SGPanelGetSettings
  5282.             dc.w                $2F3C
  5283.             dc.w                $000C
  5284.             dc.w                $0209
  5285.             moveq               #0,d0
  5286.             dc.w                $A82A
  5287.         EndM
  5288.     ELSE
  5289.         IMPORT_CFM_FUNCTION SGPanelGetSettings
  5290.     ENDIF
  5291.  
  5292. ;
  5293. ; pascal ComponentResult SGPanelSetSettings(SeqGrabComponent s, SGChannel c, UserData ud, long flags)
  5294. ;
  5295.     IF ¬ GENERATINGCFM THEN
  5296.         Macro
  5297.         _SGPanelSetSettings
  5298.             dc.w                $2F3C
  5299.             dc.w                $000C
  5300.             dc.w                $020A
  5301.             moveq               #0,d0
  5302.             dc.w                $A82A
  5303.         EndM
  5304.     ELSE
  5305.         IMPORT_CFM_FUNCTION SGPanelSetSettings
  5306.     ENDIF
  5307.  
  5308. ;
  5309. ; pascal ComponentResult SGPanelValidateInput(SeqGrabComponent s, Boolean *ok)
  5310. ;
  5311.     IF ¬ GENERATINGCFM THEN
  5312.         Macro
  5313.         _SGPanelValidateInput
  5314.             dc.w                $2F3C
  5315.             dc.w                $0004
  5316.             dc.w                $020B
  5317.             moveq               #0,d0
  5318.             dc.w                $A82A
  5319.         EndM
  5320.     ELSE
  5321.         IMPORT_CFM_FUNCTION SGPanelValidateInput
  5322.     ENDIF
  5323.  
  5324. ;
  5325. ; pascal ComponentResult SGPanelSetEventFilter(SeqGrabComponent s, SGModalFilterUPP proc, long refCon)
  5326. ;
  5327.     IF ¬ GENERATINGCFM THEN
  5328.         Macro
  5329.         _SGPanelSetEventFilter
  5330.             dc.w                $2F3C
  5331.             dc.w                $0008
  5332.             dc.w                $020C
  5333.             moveq               #0,d0
  5334.             dc.w                $A82A
  5335.         EndM
  5336.     ELSE
  5337.         IMPORT_CFM_FUNCTION SGPanelSetEventFilter
  5338.     ENDIF
  5339.  
  5340. ; ** Sequence Grab VIDEO CHANNEL Component Stuff **
  5341. ;
  5342. ;    Video stuff
  5343. ;
  5344. SGCompressInfo            RECORD 0
  5345. buffer                     ds.l    1                ; offset: $0 (0)
  5346. bufferSize                 ds.l    1                ; offset: $4 (4)
  5347. similarity                 ds.b    1                ; offset: $8 (8)
  5348. reserved                 ds.b    1                ; offset: $9 (9)
  5349. sizeof                     EQU *                    ; size:   $A (10)
  5350.                         ENDR
  5351. VideoBottles            RECORD 0
  5352. procCount                 ds.w    1                ; offset: $0 (0)
  5353. grabProc                 ds.l    1                ; offset: $2 (2)
  5354. grabCompleteProc         ds.l    1                ; offset: $6 (6)
  5355. displayProc                 ds.l    1                ; offset: $A (10)
  5356. compressProc             ds.l    1                ; offset: $E (14)
  5357. compressCompleteProc     ds.l    1                ; offset: $12 (18)
  5358. addFrameProc             ds.l    1                ; offset: $16 (22)
  5359. transferFrameProc         ds.l    1                ; offset: $1A (26)
  5360. grabCompressCompleteProc  ds.l    1                ; offset: $1E (30)
  5361. displayCompressProc         ds.l    1                ; offset: $22 (34)
  5362. sizeof                     EQU *                    ; size:   $26 (38)
  5363.                         ENDR
  5364. ;
  5365. ; pascal ComponentResult SGGetSrcVideoBounds(SGChannel c, Rect *r)
  5366. ;
  5367.     IF ¬ GENERATINGCFM THEN
  5368.         Macro
  5369.         _SGGetSrcVideoBounds
  5370.             dc.w                $2F3C
  5371.             dc.w                $0004
  5372.             dc.w                $0100
  5373.             moveq               #0,d0
  5374.             dc.w                $A82A
  5375.         EndM
  5376.     ELSE
  5377.         IMPORT_CFM_FUNCTION SGGetSrcVideoBounds
  5378.     ENDIF
  5379.  
  5380. ;
  5381. ; pascal ComponentResult SGSetVideoRect(SGChannel c, const Rect *r)
  5382. ;
  5383.     IF ¬ GENERATINGCFM THEN
  5384.         Macro
  5385.         _SGSetVideoRect
  5386.             dc.w                $2F3C
  5387.             dc.w                $0004
  5388.             dc.w                $0101
  5389.             moveq               #0,d0
  5390.             dc.w                $A82A
  5391.         EndM
  5392.     ELSE
  5393.         IMPORT_CFM_FUNCTION SGSetVideoRect
  5394.     ENDIF
  5395.  
  5396. ;
  5397. ; pascal ComponentResult SGGetVideoRect(SGChannel c, Rect *r)
  5398. ;
  5399.     IF ¬ GENERATINGCFM THEN
  5400.         Macro
  5401.         _SGGetVideoRect
  5402.             dc.w                $2F3C
  5403.             dc.w                $0004
  5404.             dc.w                $0102
  5405.             moveq               #0,d0
  5406.             dc.w                $A82A
  5407.         EndM
  5408.     ELSE
  5409.         IMPORT_CFM_FUNCTION SGGetVideoRect
  5410.     ENDIF
  5411.  
  5412. ;
  5413. ; pascal ComponentResult SGGetVideoCompressorType(SGChannel c, OSType *compressorType)
  5414. ;
  5415.     IF ¬ GENERATINGCFM THEN
  5416.         Macro
  5417.         _SGGetVideoCompressorType
  5418.             dc.w                $2F3C
  5419.             dc.w                $0004
  5420.             dc.w                $0103
  5421.             moveq               #0,d0
  5422.             dc.w                $A82A
  5423.         EndM
  5424.     ELSE
  5425.         IMPORT_CFM_FUNCTION SGGetVideoCompressorType
  5426.     ENDIF
  5427.  
  5428. ;
  5429. ; pascal ComponentResult SGSetVideoCompressorType(SGChannel c, OSType compressorType)
  5430. ;
  5431.     IF ¬ GENERATINGCFM THEN
  5432.         Macro
  5433.         _SGSetVideoCompressorType
  5434.             dc.w                $2F3C
  5435.             dc.w                $0004
  5436.             dc.w                $0104
  5437.             moveq               #0,d0
  5438.             dc.w                $A82A
  5439.         EndM
  5440.     ELSE
  5441.         IMPORT_CFM_FUNCTION SGSetVideoCompressorType
  5442.     ENDIF
  5443.  
  5444. ;
  5445. ; pascal ComponentResult SGSetVideoCompressor(SGChannel c, short depth, CompressorComponent compressor, CodecQ spatialQuality, CodecQ temporalQuality, long keyFrameRate)
  5446. ;
  5447.     IF ¬ GENERATINGCFM THEN
  5448.         Macro
  5449.         _SGSetVideoCompressor
  5450.             dc.w                $2F3C
  5451.             dc.w                $0012
  5452.             dc.w                $0105
  5453.             moveq               #0,d0
  5454.             dc.w                $A82A
  5455.         EndM
  5456.     ELSE
  5457.         IMPORT_CFM_FUNCTION SGSetVideoCompressor
  5458.     ENDIF
  5459.  
  5460. ;
  5461. ; pascal ComponentResult SGGetVideoCompressor(SGChannel c, short *depth, CompressorComponent *compressor, CodecQ *spatialQuality, CodecQ *temporalQuality, long *keyFrameRate)
  5462. ;
  5463.     IF ¬ GENERATINGCFM THEN
  5464.         Macro
  5465.         _SGGetVideoCompressor
  5466.             dc.w                $2F3C
  5467.             dc.w                $0014
  5468.             dc.w                $0106
  5469.             moveq               #0,d0
  5470.             dc.w                $A82A
  5471.         EndM
  5472.     ELSE
  5473.         IMPORT_CFM_FUNCTION SGGetVideoCompressor
  5474.     ENDIF
  5475.  
  5476. ;
  5477. ; pascal ComponentInstance SGGetVideoDigitizerComponent(SGChannel c)
  5478. ;
  5479.     IF ¬ GENERATINGCFM THEN
  5480.         Macro
  5481.         _SGGetVideoDigitizerComponent
  5482.             dc.w                $2F3C
  5483.             dc.w                $0000
  5484.             dc.w                $0107
  5485.             moveq               #0,d0
  5486.             dc.w                $A82A
  5487.         EndM
  5488.     ELSE
  5489.         IMPORT_CFM_FUNCTION SGGetVideoDigitizerComponent
  5490.     ENDIF
  5491.  
  5492. ;
  5493. ; pascal ComponentResult SGSetVideoDigitizerComponent(SGChannel c, ComponentInstance vdig)
  5494. ;
  5495.     IF ¬ GENERATINGCFM THEN
  5496.         Macro
  5497.         _SGSetVideoDigitizerComponent
  5498.             dc.w                $2F3C
  5499.             dc.w                $0004
  5500.             dc.w                $0108
  5501.             moveq               #0,d0
  5502.             dc.w                $A82A
  5503.         EndM
  5504.     ELSE
  5505.         IMPORT_CFM_FUNCTION SGSetVideoDigitizerComponent
  5506.     ENDIF
  5507.  
  5508. ;
  5509. ; pascal ComponentResult SGVideoDigitizerChanged(SGChannel c)
  5510. ;
  5511.     IF ¬ GENERATINGCFM THEN
  5512.         Macro
  5513.         _SGVideoDigitizerChanged
  5514.             dc.w                $2F3C
  5515.             dc.w                $0000
  5516.             dc.w                $0109
  5517.             moveq               #0,d0
  5518.             dc.w                $A82A
  5519.         EndM
  5520.     ELSE
  5521.         IMPORT_CFM_FUNCTION SGVideoDigitizerChanged
  5522.     ENDIF
  5523.  
  5524. ;
  5525. ; pascal ComponentResult SGSetVideoBottlenecks(SGChannel c, VideoBottles *vb)
  5526. ;
  5527.     IF ¬ GENERATINGCFM THEN
  5528.         Macro
  5529.         _SGSetVideoBottlenecks
  5530.             dc.w                $2F3C
  5531.             dc.w                $0004
  5532.             dc.w                $010A
  5533.             moveq               #0,d0
  5534.             dc.w                $A82A
  5535.         EndM
  5536.     ELSE
  5537.         IMPORT_CFM_FUNCTION SGSetVideoBottlenecks
  5538.     ENDIF
  5539.  
  5540. ;
  5541. ; pascal ComponentResult SGGetVideoBottlenecks(SGChannel c, VideoBottles *vb)
  5542. ;
  5543.     IF ¬ GENERATINGCFM THEN
  5544.         Macro
  5545.         _SGGetVideoBottlenecks
  5546.             dc.w                $2F3C
  5547.             dc.w                $0004
  5548.             dc.w                $010B
  5549.             moveq               #0,d0
  5550.             dc.w                $A82A
  5551.         EndM
  5552.     ELSE
  5553.         IMPORT_CFM_FUNCTION SGGetVideoBottlenecks
  5554.     ENDIF
  5555.  
  5556. ;
  5557. ; pascal ComponentResult SGGrabFrame(SGChannel c, short bufferNum)
  5558. ;
  5559.     IF ¬ GENERATINGCFM THEN
  5560.         Macro
  5561.         _SGGrabFrame
  5562.             dc.w                $2F3C
  5563.             dc.w                $0002
  5564.             dc.w                $010C
  5565.             moveq               #0,d0
  5566.             dc.w                $A82A
  5567.         EndM
  5568.     ELSE
  5569.         IMPORT_CFM_FUNCTION SGGrabFrame
  5570.     ENDIF
  5571.  
  5572. ;
  5573. ; pascal ComponentResult SGGrabFrameComplete(SGChannel c, short bufferNum, Boolean *done)
  5574. ;
  5575.     IF ¬ GENERATINGCFM THEN
  5576.         Macro
  5577.         _SGGrabFrameComplete
  5578.             dc.w                $2F3C
  5579.             dc.w                $0006
  5580.             dc.w                $010D
  5581.             moveq               #0,d0
  5582.             dc.w                $A82A
  5583.         EndM
  5584.     ELSE
  5585.         IMPORT_CFM_FUNCTION SGGrabFrameComplete
  5586.     ENDIF
  5587.  
  5588. ;
  5589. ; pascal ComponentResult SGDisplayFrame(SGChannel c, short bufferNum, const MatrixRecord *mp, RgnHandle clipRgn)
  5590. ;
  5591.     IF ¬ GENERATINGCFM THEN
  5592.         Macro
  5593.         _SGDisplayFrame
  5594.             dc.w                $2F3C
  5595.             dc.w                $000A
  5596.             dc.w                $010E
  5597.             moveq               #0,d0
  5598.             dc.w                $A82A
  5599.         EndM
  5600.     ELSE
  5601.         IMPORT_CFM_FUNCTION SGDisplayFrame
  5602.     ENDIF
  5603.  
  5604. ;
  5605. ; pascal ComponentResult SGCompressFrame(SGChannel c, short bufferNum)
  5606. ;
  5607.     IF ¬ GENERATINGCFM THEN
  5608.         Macro
  5609.         _SGCompressFrame
  5610.             dc.w                $2F3C
  5611.             dc.w                $0002
  5612.             dc.w                $010F
  5613.             moveq               #0,d0
  5614.             dc.w                $A82A
  5615.         EndM
  5616.     ELSE
  5617.         IMPORT_CFM_FUNCTION SGCompressFrame
  5618.     ENDIF
  5619.  
  5620. ;
  5621. ; pascal ComponentResult SGCompressFrameComplete(SGChannel c, short bufferNum, Boolean *done, SGCompressInfo *ci)
  5622. ;
  5623.     IF ¬ GENERATINGCFM THEN
  5624.         Macro
  5625.         _SGCompressFrameComplete
  5626.             dc.w                $2F3C
  5627.             dc.w                $000A
  5628.             dc.w                $0110
  5629.             moveq               #0,d0
  5630.             dc.w                $A82A
  5631.         EndM
  5632.     ELSE
  5633.         IMPORT_CFM_FUNCTION SGCompressFrameComplete
  5634.     ENDIF
  5635.  
  5636. ;
  5637. ; pascal ComponentResult SGAddFrame(SGChannel c, short bufferNum, TimeValue atTime, TimeScale scale, const SGCompressInfo *ci)
  5638. ;
  5639.     IF ¬ GENERATINGCFM THEN
  5640.         Macro
  5641.         _SGAddFrame
  5642.             dc.w                $2F3C
  5643.             dc.w                $000E
  5644.             dc.w                $0111
  5645.             moveq               #0,d0
  5646.             dc.w                $A82A
  5647.         EndM
  5648.     ELSE
  5649.         IMPORT_CFM_FUNCTION SGAddFrame
  5650.     ENDIF
  5651.  
  5652. ;
  5653. ; pascal ComponentResult SGTransferFrameForCompress(SGChannel c, short bufferNum, const MatrixRecord *mp, RgnHandle clipRgn)
  5654. ;
  5655.     IF ¬ GENERATINGCFM THEN
  5656.         Macro
  5657.         _SGTransferFrameForCompress
  5658.             dc.w                $2F3C
  5659.             dc.w                $000A
  5660.             dc.w                $0112
  5661.             moveq               #0,d0
  5662.             dc.w                $A82A
  5663.         EndM
  5664.     ELSE
  5665.         IMPORT_CFM_FUNCTION SGTransferFrameForCompress
  5666.     ENDIF
  5667.  
  5668. ;
  5669. ; pascal ComponentResult SGSetCompressBuffer(SGChannel c, short depth, const Rect *compressSize)
  5670. ;
  5671.     IF ¬ GENERATINGCFM THEN
  5672.         Macro
  5673.         _SGSetCompressBuffer
  5674.             dc.w                $2F3C
  5675.             dc.w                $0006
  5676.             dc.w                $0113
  5677.             moveq               #0,d0
  5678.             dc.w                $A82A
  5679.         EndM
  5680.     ELSE
  5681.         IMPORT_CFM_FUNCTION SGSetCompressBuffer
  5682.     ENDIF
  5683.  
  5684. ;
  5685. ; pascal ComponentResult SGGetCompressBuffer(SGChannel c, short *depth, Rect *compressSize)
  5686. ;
  5687.     IF ¬ GENERATINGCFM THEN
  5688.         Macro
  5689.         _SGGetCompressBuffer
  5690.             dc.w                $2F3C
  5691.             dc.w                $0008
  5692.             dc.w                $0114
  5693.             moveq               #0,d0
  5694.             dc.w                $A82A
  5695.         EndM
  5696.     ELSE
  5697.         IMPORT_CFM_FUNCTION SGGetCompressBuffer
  5698.     ENDIF
  5699.  
  5700. ;
  5701. ; pascal ComponentResult SGGetBufferInfo(SGChannel c, short bufferNum, PixMapHandle *bufferPM, Rect *bufferRect, GWorldPtr *compressBuffer, Rect *compressBufferRect)
  5702. ;
  5703.     IF ¬ GENERATINGCFM THEN
  5704.         Macro
  5705.         _SGGetBufferInfo
  5706.             dc.w                $2F3C
  5707.             dc.w                $0012
  5708.             dc.w                $0115
  5709.             moveq               #0,d0
  5710.             dc.w                $A82A
  5711.         EndM
  5712.     ELSE
  5713.         IMPORT_CFM_FUNCTION SGGetBufferInfo
  5714.     ENDIF
  5715.  
  5716. ;
  5717. ; pascal ComponentResult SGSetUseScreenBuffer(SGChannel c, Boolean useScreenBuffer)
  5718. ;
  5719.     IF ¬ GENERATINGCFM THEN
  5720.         Macro
  5721.         _SGSetUseScreenBuffer
  5722.             dc.w                $2F3C
  5723.             dc.w                $0002
  5724.             dc.w                $0116
  5725.             moveq               #0,d0
  5726.             dc.w                $A82A
  5727.         EndM
  5728.     ELSE
  5729.         IMPORT_CFM_FUNCTION SGSetUseScreenBuffer
  5730.     ENDIF
  5731.  
  5732. ;
  5733. ; pascal ComponentResult SGGetUseScreenBuffer(SGChannel c, Boolean *useScreenBuffer)
  5734. ;
  5735.     IF ¬ GENERATINGCFM THEN
  5736.         Macro
  5737.         _SGGetUseScreenBuffer
  5738.             dc.w                $2F3C
  5739.             dc.w                $0004
  5740.             dc.w                $0117
  5741.             moveq               #0,d0
  5742.             dc.w                $A82A
  5743.         EndM
  5744.     ELSE
  5745.         IMPORT_CFM_FUNCTION SGGetUseScreenBuffer
  5746.     ENDIF
  5747.  
  5748. ;
  5749. ; pascal ComponentResult SGGrabCompressComplete(SGChannel c, Boolean *done, SGCompressInfo *ci, TimeRecord *tr)
  5750. ;
  5751.     IF ¬ GENERATINGCFM THEN
  5752.         Macro
  5753.         _SGGrabCompressComplete
  5754.             dc.w                $2F3C
  5755.             dc.w                $000C
  5756.             dc.w                $0118
  5757.             moveq               #0,d0
  5758.             dc.w                $A82A
  5759.         EndM
  5760.     ELSE
  5761.         IMPORT_CFM_FUNCTION SGGrabCompressComplete
  5762.     ENDIF
  5763.  
  5764. ;
  5765. ; pascal ComponentResult SGDisplayCompress(SGChannel c, Ptr dataPtr, ImageDescriptionHandle desc, MatrixRecord *mp, RgnHandle clipRgn)
  5766. ;
  5767.     IF ¬ GENERATINGCFM THEN
  5768.         Macro
  5769.         _SGDisplayCompress
  5770.             dc.w                $2F3C
  5771.             dc.w                $0010
  5772.             dc.w                $0119
  5773.             moveq               #0,d0
  5774.             dc.w                $A82A
  5775.         EndM
  5776.     ELSE
  5777.         IMPORT_CFM_FUNCTION SGDisplayCompress
  5778.     ENDIF
  5779.  
  5780. ;
  5781. ; pascal ComponentResult SGSetFrameRate(SGChannel c, Fixed frameRate)
  5782. ;
  5783.     IF ¬ GENERATINGCFM THEN
  5784.         Macro
  5785.         _SGSetFrameRate
  5786.             dc.w                $2F3C
  5787.             dc.w                $0004
  5788.             dc.w                $011A
  5789.             moveq               #0,d0
  5790.             dc.w                $A82A
  5791.         EndM
  5792.     ELSE
  5793.         IMPORT_CFM_FUNCTION SGSetFrameRate
  5794.     ENDIF
  5795.  
  5796. ;
  5797. ; pascal ComponentResult SGGetFrameRate(SGChannel c, Fixed *frameRate)
  5798. ;
  5799.     IF ¬ GENERATINGCFM THEN
  5800.         Macro
  5801.         _SGGetFrameRate
  5802.             dc.w                $2F3C
  5803.             dc.w                $0004
  5804.             dc.w                $011B
  5805.             moveq               #0,d0
  5806.             dc.w                $A82A
  5807.         EndM
  5808.     ELSE
  5809.         IMPORT_CFM_FUNCTION SGGetFrameRate
  5810.     ENDIF
  5811.  
  5812. ;
  5813. ; pascal ComponentResult SGSetPreferredPacketSize(SGChannel c, long preferredPacketSizeInBytes)
  5814. ;
  5815.     IF ¬ GENERATINGCFM THEN
  5816.         Macro
  5817.         _SGSetPreferredPacketSize
  5818.             dc.w                $2F3C
  5819.             dc.w                $0004
  5820.             dc.w                $0121
  5821.             moveq               #0,d0
  5822.             dc.w                $A82A
  5823.         EndM
  5824.     ELSE
  5825.         IMPORT_CFM_FUNCTION SGSetPreferredPacketSize
  5826.     ENDIF
  5827.  
  5828. ;
  5829. ; pascal ComponentResult SGGetPreferredPacketSize(SGChannel c, long *preferredPacketSizeInBytes)
  5830. ;
  5831.     IF ¬ GENERATINGCFM THEN
  5832.         Macro
  5833.         _SGGetPreferredPacketSize
  5834.             dc.w                $2F3C
  5835.             dc.w                $0004
  5836.             dc.w                $0122
  5837.             moveq               #0,d0
  5838.             dc.w                $A82A
  5839.         EndM
  5840.     ELSE
  5841.         IMPORT_CFM_FUNCTION SGGetPreferredPacketSize
  5842.     ENDIF
  5843.  
  5844. ;
  5845. ; pascal ComponentResult SGSetUserVideoCompressorList(SGChannel c, Handle compressorTypes)
  5846. ;
  5847.     IF ¬ GENERATINGCFM THEN
  5848.         Macro
  5849.         _SGSetUserVideoCompressorList
  5850.             dc.w                $2F3C
  5851.             dc.w                $0004
  5852.             dc.w                $0123
  5853.             moveq               #0,d0
  5854.             dc.w                $A82A
  5855.         EndM
  5856.     ELSE
  5857.         IMPORT_CFM_FUNCTION SGSetUserVideoCompressorList
  5858.     ENDIF
  5859.  
  5860. ;
  5861. ; pascal ComponentResult SGGetUserVideoCompressorList(SGChannel c, Handle *compressorTypes)
  5862. ;
  5863.     IF ¬ GENERATINGCFM THEN
  5864.         Macro
  5865.         _SGGetUserVideoCompressorList
  5866.             dc.w                $2F3C
  5867.             dc.w                $0004
  5868.             dc.w                $0124
  5869.             moveq               #0,d0
  5870.             dc.w                $A82A
  5871.         EndM
  5872.     ELSE
  5873.         IMPORT_CFM_FUNCTION SGGetUserVideoCompressorList
  5874.     ENDIF
  5875.  
  5876. ; ** Sequence Grab SOUND CHANNEL Component Stuff **
  5877. ;
  5878. ;    Sound stuff
  5879. ;
  5880. ;
  5881. ; pascal ComponentResult SGSetSoundInputDriver(SGChannel c, ConstStr255Param driverName)
  5882. ;
  5883.     IF ¬ GENERATINGCFM THEN
  5884.         Macro
  5885.         _SGSetSoundInputDriver
  5886.             dc.w                $2F3C
  5887.             dc.w                $0004
  5888.             dc.w                $0100
  5889.             moveq               #0,d0
  5890.             dc.w                $A82A
  5891.         EndM
  5892.     ELSE
  5893.         IMPORT_CFM_FUNCTION SGSetSoundInputDriver
  5894.     ENDIF
  5895.  
  5896. ;
  5897. ; pascal long SGGetSoundInputDriver(SGChannel c)
  5898. ;
  5899.     IF ¬ GENERATINGCFM THEN
  5900.         Macro
  5901.         _SGGetSoundInputDriver
  5902.             dc.w                $2F3C
  5903.             dc.w                $0000
  5904.             dc.w                $0101
  5905.             moveq               #0,d0
  5906.             dc.w                $A82A
  5907.         EndM
  5908.     ELSE
  5909.         IMPORT_CFM_FUNCTION SGGetSoundInputDriver
  5910.     ENDIF
  5911.  
  5912. ;
  5913. ; pascal ComponentResult SGSoundInputDriverChanged(SGChannel c)
  5914. ;
  5915.     IF ¬ GENERATINGCFM THEN
  5916.         Macro
  5917.         _SGSoundInputDriverChanged
  5918.             dc.w                $2F3C
  5919.             dc.w                $0000
  5920.             dc.w                $0102
  5921.             moveq               #0,d0
  5922.             dc.w                $A82A
  5923.         EndM
  5924.     ELSE
  5925.         IMPORT_CFM_FUNCTION SGSoundInputDriverChanged
  5926.     ENDIF
  5927.  
  5928. ;
  5929. ; pascal ComponentResult SGSetSoundRecordChunkSize(SGChannel c, long seconds)
  5930. ;
  5931.     IF ¬ GENERATINGCFM THEN
  5932.         Macro
  5933.         _SGSetSoundRecordChunkSize
  5934.             dc.w                $2F3C
  5935.             dc.w                $0004
  5936.             dc.w                $0103
  5937.             moveq               #0,d0
  5938.             dc.w                $A82A
  5939.         EndM
  5940.     ELSE
  5941.         IMPORT_CFM_FUNCTION SGSetSoundRecordChunkSize
  5942.     ENDIF
  5943.  
  5944. ;
  5945. ; pascal long SGGetSoundRecordChunkSize(SGChannel c)
  5946. ;
  5947.     IF ¬ GENERATINGCFM THEN
  5948.         Macro
  5949.         _SGGetSoundRecordChunkSize
  5950.             dc.w                $2F3C
  5951.             dc.w                $0000
  5952.             dc.w                $0104
  5953.             moveq               #0,d0
  5954.             dc.w                $A82A
  5955.         EndM
  5956.     ELSE
  5957.         IMPORT_CFM_FUNCTION SGGetSoundRecordChunkSize
  5958.     ENDIF
  5959.  
  5960. ;
  5961. ; pascal ComponentResult SGSetSoundInputRate(SGChannel c, Fixed rate)
  5962. ;
  5963.     IF ¬ GENERATINGCFM THEN
  5964.         Macro
  5965.         _SGSetSoundInputRate
  5966.             dc.w                $2F3C
  5967.             dc.w                $0004
  5968.             dc.w                $0105
  5969.             moveq               #0,d0
  5970.             dc.w                $A82A
  5971.         EndM
  5972.     ELSE
  5973.         IMPORT_CFM_FUNCTION SGSetSoundInputRate
  5974.     ENDIF
  5975.  
  5976. ;
  5977. ; pascal Fixed SGGetSoundInputRate(SGChannel c)
  5978. ;
  5979.     IF ¬ GENERATINGCFM THEN
  5980.         Macro
  5981.         _SGGetSoundInputRate
  5982.             dc.w                $2F3C
  5983.             dc.w                $0000
  5984.             dc.w                $0106
  5985.             moveq               #0,d0
  5986.             dc.w                $A82A
  5987.         EndM
  5988.     ELSE
  5989.         IMPORT_CFM_FUNCTION SGGetSoundInputRate
  5990.     ENDIF
  5991.  
  5992. ;
  5993. ; pascal ComponentResult SGSetSoundInputParameters(SGChannel c, short sampleSize, short numChannels, OSType compressionType)
  5994. ;
  5995.     IF ¬ GENERATINGCFM THEN
  5996.         Macro
  5997.         _SGSetSoundInputParameters
  5998.             dc.w                $2F3C
  5999.             dc.w                $0008
  6000.             dc.w                $0107
  6001.             moveq               #0,d0
  6002.             dc.w                $A82A
  6003.         EndM
  6004.     ELSE
  6005.         IMPORT_CFM_FUNCTION SGSetSoundInputParameters
  6006.     ENDIF
  6007.  
  6008. ;
  6009. ; pascal ComponentResult SGGetSoundInputParameters(SGChannel c, short *sampleSize, short *numChannels, OSType *compressionType)
  6010. ;
  6011.     IF ¬ GENERATINGCFM THEN
  6012.         Macro
  6013.         _SGGetSoundInputParameters
  6014.             dc.w                $2F3C
  6015.             dc.w                $000C
  6016.             dc.w                $0108
  6017.             moveq               #0,d0
  6018.             dc.w                $A82A
  6019.         EndM
  6020.     ELSE
  6021.         IMPORT_CFM_FUNCTION SGGetSoundInputParameters
  6022.     ENDIF
  6023.  
  6024. ;
  6025. ; pascal ComponentResult SGSetAdditionalSoundRates(SGChannel c, Handle rates)
  6026. ;
  6027.     IF ¬ GENERATINGCFM THEN
  6028.         Macro
  6029.         _SGSetAdditionalSoundRates
  6030.             dc.w                $2F3C
  6031.             dc.w                $0004
  6032.             dc.w                $0109
  6033.             moveq               #0,d0
  6034.             dc.w                $A82A
  6035.         EndM
  6036.     ELSE
  6037.         IMPORT_CFM_FUNCTION SGSetAdditionalSoundRates
  6038.     ENDIF
  6039.  
  6040. ;
  6041. ; pascal ComponentResult SGGetAdditionalSoundRates(SGChannel c, Handle *rates)
  6042. ;
  6043.     IF ¬ GENERATINGCFM THEN
  6044.         Macro
  6045.         _SGGetAdditionalSoundRates
  6046.             dc.w                $2F3C
  6047.             dc.w                $0004
  6048.             dc.w                $010A
  6049.             moveq               #0,d0
  6050.             dc.w                $A82A
  6051.         EndM
  6052.     ELSE
  6053.         IMPORT_CFM_FUNCTION SGGetAdditionalSoundRates
  6054.     ENDIF
  6055.  
  6056. ;
  6057. ;    Text stuff
  6058. ;
  6059. ;
  6060. ; pascal ComponentResult SGSetFontName(SGChannel c, StringPtr pstr)
  6061. ;
  6062.     IF ¬ GENERATINGCFM THEN
  6063.         Macro
  6064.         _SGSetFontName
  6065.             dc.w                $2F3C
  6066.             dc.w                $0004
  6067.             dc.w                $0100
  6068.             moveq               #0,d0
  6069.             dc.w                $A82A
  6070.         EndM
  6071.     ELSE
  6072.         IMPORT_CFM_FUNCTION SGSetFontName
  6073.     ENDIF
  6074.  
  6075. ;
  6076. ; pascal ComponentResult SGSetFontSize(SGChannel c, short fontSize)
  6077. ;
  6078.     IF ¬ GENERATINGCFM THEN
  6079.         Macro
  6080.         _SGSetFontSize
  6081.             dc.w                $2F3C
  6082.             dc.w                $0002
  6083.             dc.w                $0101
  6084.             moveq               #0,d0
  6085.             dc.w                $A82A
  6086.         EndM
  6087.     ELSE
  6088.         IMPORT_CFM_FUNCTION SGSetFontSize
  6089.     ENDIF
  6090.  
  6091. ;
  6092. ; pascal ComponentResult SGSetTextForeColor(SGChannel c, RGBColor *theColor)
  6093. ;
  6094.     IF ¬ GENERATINGCFM THEN
  6095.         Macro
  6096.         _SGSetTextForeColor
  6097.             dc.w                $2F3C
  6098.             dc.w                $0004
  6099.             dc.w                $0102
  6100.             moveq               #0,d0
  6101.             dc.w                $A82A
  6102.         EndM
  6103.     ELSE
  6104.         IMPORT_CFM_FUNCTION SGSetTextForeColor
  6105.     ENDIF
  6106.  
  6107. ;
  6108. ; pascal ComponentResult SGSetTextBackColor(SGChannel c, RGBColor *theColor)
  6109. ;
  6110.     IF ¬ GENERATINGCFM THEN
  6111.         Macro
  6112.         _SGSetTextBackColor
  6113.             dc.w                $2F3C
  6114.             dc.w                $0004
  6115.             dc.w                $0103
  6116.             moveq               #0,d0
  6117.             dc.w                $A82A
  6118.         EndM
  6119.     ELSE
  6120.         IMPORT_CFM_FUNCTION SGSetTextBackColor
  6121.     ENDIF
  6122.  
  6123. ;
  6124. ; pascal ComponentResult SGSetJustification(SGChannel c, short just)
  6125. ;
  6126.     IF ¬ GENERATINGCFM THEN
  6127.         Macro
  6128.         _SGSetJustification
  6129.             dc.w                $2F3C
  6130.             dc.w                $0002
  6131.             dc.w                $0104
  6132.             moveq               #0,d0
  6133.             dc.w                $A82A
  6134.         EndM
  6135.     ELSE
  6136.         IMPORT_CFM_FUNCTION SGSetJustification
  6137.     ENDIF
  6138.  
  6139. ;
  6140. ; pascal ComponentResult SGGetTextReturnToSpaceValue(SGChannel c, short *rettospace)
  6141. ;
  6142.     IF ¬ GENERATINGCFM THEN
  6143.         Macro
  6144.         _SGGetTextReturnToSpaceValue
  6145.             dc.w                $2F3C
  6146.             dc.w                $0004
  6147.             dc.w                $0105
  6148.             moveq               #0,d0
  6149.             dc.w                $A82A
  6150.         EndM
  6151.     ELSE
  6152.         IMPORT_CFM_FUNCTION SGGetTextReturnToSpaceValue
  6153.     ENDIF
  6154.  
  6155. ;
  6156. ; pascal ComponentResult SGSetTextReturnToSpaceValue(SGChannel c, short rettospace)
  6157. ;
  6158.     IF ¬ GENERATINGCFM THEN
  6159.         Macro
  6160.         _SGSetTextReturnToSpaceValue
  6161.             dc.w                $2F3C
  6162.             dc.w                $0002
  6163.             dc.w                $0106
  6164.             moveq               #0,d0
  6165.             dc.w                $A82A
  6166.         EndM
  6167.     ELSE
  6168.         IMPORT_CFM_FUNCTION SGSetTextReturnToSpaceValue
  6169.     ENDIF
  6170.  
  6171. ;
  6172. ;    Music stuff
  6173. ;
  6174. ;
  6175. ; pascal ComponentResult SGGetInstrument(SGChannel c, ToneDescription *td)
  6176. ;
  6177.     IF ¬ GENERATINGCFM THEN
  6178.         Macro
  6179.         _SGGetInstrument
  6180.             dc.w                $2F3C
  6181.             dc.w                $0004
  6182.             dc.w                $0100
  6183.             moveq               #0,d0
  6184.             dc.w                $A82A
  6185.         EndM
  6186.     ELSE
  6187.         IMPORT_CFM_FUNCTION SGGetInstrument
  6188.     ENDIF
  6189.  
  6190. ;
  6191. ; pascal ComponentResult SGSetInstrument(SGChannel c, ToneDescription *td)
  6192. ;
  6193.     IF ¬ GENERATINGCFM THEN
  6194.         Macro
  6195.         _SGSetInstrument
  6196.             dc.w                $2F3C
  6197.             dc.w                $0004
  6198.             dc.w                $0101
  6199.             moveq               #0,d0
  6200.             dc.w                $A82A
  6201.         EndM
  6202.     ELSE
  6203.         IMPORT_CFM_FUNCTION SGSetInstrument
  6204.     ENDIF
  6205.  
  6206.  
  6207. sgChannelAtom                    EQU        'chan'
  6208. sgChannelSettingsAtom            EQU        'ctom'
  6209. sgChannelDescription            EQU        'cdsc'
  6210. sgChannelSettings                EQU        'cset'
  6211.  
  6212. sgDeviceNameType                EQU        'name'
  6213. sgUsageType                        EQU        'use '
  6214. sgPlayFlagsType                    EQU        'plyf'
  6215. sgClipType                        EQU        'clip'
  6216. sgMatrixType                    EQU        'mtrx'
  6217. sgVolumeType                    EQU        'volu'
  6218.  
  6219. sgPanelSettingsAtom                EQU        'ptom'
  6220. sgPanelDescription                EQU        'pdsc'
  6221. sgPanelSettings                    EQU        'pset'
  6222.  
  6223. sgcSoundCompressionType            EQU        'scmp'
  6224. sgcSoundSampleRateType            EQU        'srat'
  6225. sgcSoundChannelCountType        EQU        'schn'
  6226. sgcSoundSampleSizeType            EQU        'ssiz'
  6227. sgcSoundInputType                EQU        'sinp'
  6228. sgcSoundGainType                EQU        'gain'
  6229.  
  6230. sgcVideoHueType                    EQU        'hue '
  6231. sgcVideoSaturationType            EQU        'satr'
  6232. sgcVideoContrastType            EQU        'trst'
  6233. sgcVideoSharpnessType            EQU        'shrp'
  6234. sgcVideoBrigtnessType            EQU        'brit'
  6235. sgcVideoBlackLevelType            EQU        'blkl'
  6236. sgcVideoWhiteLevelType            EQU        'whtl'
  6237. sgcVideoInputType                EQU        'vinp'
  6238. sgcVideoFormatType                EQU        'vstd'
  6239. sgcVideoFilterType                EQU        'vflt'
  6240. sgcVideoRectType                EQU        'vrct'
  6241. sgcVideoDigitizerType            EQU        'vdig'
  6242. ;  UPP call backs 
  6243.     ENDIF ; __QUICKTIMECOMPONENTS__ 
  6244.  
  6245.